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BUTAKO 


itiSTT 5^U£» (±|S]£ b— tf-) CMT 5 


TAKO18TH0 


{tisrrs^b^fKufc? 6 u— tf-) ics^-rs 


KATAI 


rtUyOSMKNfflaM) 


ZENBU0 


aa^bgflilz&SC 1 y-AIC 1 HBB9) 
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fc'cfcv -fetntzito) (DO)i' h y ?■— 
5# ) 
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ftTUS Z<7)|fg(ZA5|l@B(7)fe 

txntzfr j tmi \Z*t£W 

Tfr\ r £tzMZ>(n-? ox.— 

<V3-77^7U 

> K (*i0 o *AC 

-t-y-r-So * l-T 

vtWZo 3W=*fc 
-f -*£:&*>£#£ » 
t*5 £ £*0 T-L J: -5\ 

ilRTlzttJTfc^V- 



loth >*7-1$-3Tte£— ffl— 
fSOf] ^ TSB^fc # * 4' <b ft fr o fc 

M?tbJ:<Ki-h*>^tz-\.\ 



i-i^XLi^tztnt-f- 

£UT< h$l\ xh-i-^^x 
^77^7^ ■t'7 > K fc ->t 'J 
*t>«fc<T*£T5J:tt -f-^n 




H.P 095 EXP 65535 COLD 13880 
PLAYER 



H.P 855 EXP 65535 GOLD 15S80 
PLAYER 






tz 







S^FtZL^h+ggA! 




70> 
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•?^UA^^99Alzii^.5 
i:> S#<^<99A(zfc£ 




IZ/y-iC/S'tfJEnsei 



*we., fl«*Hifl3 erne- 
5^>. . . . 






y-A%-ts«!>fc*bx im+-T* 

<> K- ^M # , P - K £ilt*$: c 
AnTn-KTS, ^LT N y- 
x >t : "< >^B®{zftoT L s o o 



100 Msx}gm tt*«j-* 



*\ ijy^ 



T*» 



®mZ&OZ-*mi<Z5 



fc^Tti. 7-7 p n<7)iR|S|<7)§|#^'&— &S& M&L 
xmtLtZo -ftfc'lts "BftltzaX'tfrbs 1*fcT 

mm tUT^-fe 





5. y-AS-itaS-tT^r&ttltffi 



-V-y hLfc«lt«) 

::t H^JH*-*^ 58853v 
ftr>T^Z>mtfMiB~te-oibVl a 





BGM=E-RD33 






'J/N'-f /<— <75x-f 
*?£ K7-f7UA 

nx s [esci*-£'J?->*-<7) 
£ iJy\"</\'— COBGN/FE— KC#o 

(ztti < X'£Z>(ntz. t-i\ 



**• music pdas *** 



music nU«B«R:Q2 



U\ <J?->*-Tffl<7)0Nfc0FFfc\ 



^*^c^-^*7*^^se>! 



'J(3,£K TO(2,6K 8)^(1 £)x 



3fcttftfS*(- 1 £) (7)7 > ^ C* 

Ls TfiPl(7)'7-'-AV7 h<7)4># N| b 

f#* (iieit £ ft t i^ < <r>x\ t'A, 

B*LTt$Ll\, 



•J 

it. 

1£ 



[ZjSHnn 



MP* 



X 

7?" 



£P 



P 

it) s 
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RETRO-MSX 



SOU^o^-^RETRO-MSX.&Wo 




— 



H^-— .tryN^=^r«\B 



*1^;tf 







1984 tA3 (MSX1) 

->£*r(J % MS(~&3;!rb 

i:->i- ^0?'t-'-a -ft(i x 
SfcrciSafc. c%b<7)ftij| v ^<7)i& 

**- ASIPIfc ttfc 'J ?# 

hi;/**— > % 'jxa 
J ^^^/cb<^fzbS 

(JWzTTbv '\*7> 





HIGH 




30000 

6650 


29% i#£ ^ ^ . ^Jf- 

^£ & 2§i %& #§* 7* 


* 


1* ^ 
t t 


55 







T < 
■& ! 



7 7 

h 7 

' 7* 

m 9 

a i 

if -c 



tz C 



*CT! r +>7% ztili 
tto#»n^T£8?Lfc y-A-tz 

fc#, MSXlZ^tfLT^b, *fc 

7 #'88j #A,T<7> h fcU & b L < T> 

^>7 7j'"(7)^-bP*(i s •fpfT'Li 

Wf-f L TV** <7>T'f S fc < % JAM 
tzmMAt&8iLT<Z,£Z?> * 
LT, iWh7?^-t'-ACi 
«£ tltzH&jO) 77<^- £&fcH 

-ttus; 7=a7 7 JU7 7"r^-i:^ 



oT$(£i£^T"# § J: -5 tZfcS 
^(C2^0b^oT(7)ijJ^(i N ii 
^A-jT-jnLl*! fcA,TSl 

v* £ #6 XT f*> b tlT L £ 1 

^XT LI-) t>ttttfrhto.— 
MSX1<7V\— v a >T'£>£fc*Ml x 

«|*szi®[+ * 7 12 1 £0)#, M 

1—A.i—A^ £fFT'£>-i> m 
^■fs^d *> cfc -o 1 1 0flflB, 4-Tfc 
5I-3 Cf ( J tb LT L i -7 y-AT'$) 
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rf*!»_rf»',^_rft>.«_ 1 **W,.^^'l||_..'.* X .__.rf#V,. 



1984 37" 5 (MSX1) 

sy»— ■ Ny— ..^y— — -ny— — <y— -st/ 1 —— » » ' - ay— — «,y-— S4^— ^y— sy— — ^r-— 'hv' 

^'CfU hP/z^\ /\JV\ 

,r*>. __•*!._— ..<*>.—.'*-■.. __«*K— ..-Tit-— .i/IK, 







7-, 7^=f-(7)V7hf:„ t? 




*?<5>J'"£, iB8ia*\ 



1986 7Xf- (MSX1) 

■■\y— -%y l**" lay— -(.y 

-> 3 >/ \°X;u-y — a Ttin ©ft s 
* ? *co7\!^s^ (z T*fr ^ & 

l^777li l/KA\ fe &©$: 

i^b^rt^ 

ttfrfc'J, 7'n-y 

Lx-;ss§?rmttjL 



•7— Jo Ztlh^lts 

7c£fi(!?)y-A-tz 

A^MSX^Kfcfr© 
b\ MSX_bT1i, 1$ 

(J6=i -bi^t^ 

3t#5S/c'(Zf- a 

J££m&£tJ3l3: 
Pic i£BcL-n*** 

*{& £©7f-£*P*=i£7E'J 

^•yJab-Hf: ^tiW^ 



XP-OOOOOO 


HI 


-oooooo 


STflGE-Ol 




RATE X 
SPEED 




■ 


REST** 




N 


^ 



*^(7)t'U-^- K©i&S©fc*!> 

T<ti3 IMfi*^ fcTfc^ft 
U\ 4*niJ£i\ ¥—L.ti<ntz a 




• ?-f HUfilc £./t(J\ zcnf— .Mj. 
77=f-ff)V7a>frb4J^f:^'-A ; 

A£ LTM&bftT^l-XLClJ 
ISSC £ -7 fc fc ©T'<fc l J S L fc tf , 
«fc <(2tH^Ti^£,mu3:1\ 4- 

y-Atzmm^ii L £ L /- £ " ^ 
£< S&, ^faUA^'J^^z 

fc: 'J sm t\ hh, zz=g 



^t'fHit£^<ntr*s.8>, finite*. „ 

l*?-oTm<s k,tzitzUtti\ J: 
JWr;t3s£fft£ ©¥£-?& <*«£ 

titi U C^V f& fc b L h I <&— 
A£Cv? C fcll#5(7)a^&£> ? 
/ *X^A<^ ^'t>s 1 1^7 At Jv 
£ U &a.t\ -f^y-AT'L «t ^ 
*\ #fc^ L v. ^ p - K 7 >7— j 



^ftfc<Z)RETRO-MSX^'»«a3»]61i<*f*tM 



^r?t 




#r : fc3^^:'7"-Az:-iS^rL^^"r 

/uTtft^ EC 1 g(S3©^-AlZ 

RETR0-MSX<t©4S«, £5* 
J5»b"t+<fcclU LVL\V7N*> fa 



eiB©ftP/flzJ>igi9</c*no 3©P 

-7— r, *©v^s«2iB^*i*r 
i\fcfc**£To for, cjsii^o 
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(*t5)T^+- 

MSXV^j'v>|i^g|5 
"RETRO-MSX^^TS 
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KM Ball Out 




a£p{z, r]>t°zL— $f—lx 

tj.f—L.Wth^X.tlo ts tz^X 
v a >^-> jl— x-f >?\ n— ;u 

■v >Mzt>l1Z> ~ £ ^T-# Stttl 

p— ;u7V-r >?&t p*>^+ 
tt— /*— LTl**4*- Afc&3 



<<-?\,Z*>>?'>)VlnVl\ZZ\1:±fo--> 

-cuS2bift-(S£^it£\ U'fcw 

T-y— A(7)F*g!g£fca.£(Z(i N ^ 

y— a iz a *> #<i *&' i ^\ ^ ? ~> 
3 >y— A^ibsits— Jiaw^c-r 

#/ \*X;i/T* fc # i \, £ t s ^ *3 ( tt\ 

£#ttt\ *-/uyu -r > yy- 

a ttz*><^ i^ftHz&i^ff 
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Fresenied ky STUDIO 



TITLE 






ME NU 

j*-*— **— &i?Tt> 
ZZ.T\ $*— A*fctta> 

7. h : 7iJ'->3>* > ^-il-^-&c 



SELECT MODE: 

1 - NORMAL GAME 

2 - ROUND CONSTRUCTION 

3 - CHARACTER EDITOR 
O - ESCAPE 



4 

(3)b-MZ 

















S" .-c" 


























r 




; : ;4- 


*- 


*- *- 


flV 


|* 


r 


#'" 


"it 


^ 


^ * 


^ 




- 


* 


^ 


*- 


^ *- 




j 





ft? 

I 

o 



7$— JUTKf \-(T))\s—Mt'm-WR 
R #— ^ £ P > h □ —)l> L T, 
^+(zA5SESt^K'y h^-f^T 
15? 'J. *I£B^i*](Z3-;MzAft 
U'd: ^C7)fc' tZhf)\ PT'fl 
(5 £\ Z fttfa > ? > T-C J 4 ^ x 
ft— Mtfc* \s* HZ^Tl^T, 

ofcA^ &^^^]tzii^fc"r^ti 
142jjM»§u #— ;p«-a> h p- 



- 







?y^^AS5-<7;i/l 



z<n¥-i±ii\ t'-LTZUi: 



i ^(7)*^ 1-7 ^s 7*5>Kz:*i:^)^-rA 

-^JKDU-P— K^< A^feif^tlTl^ 

< £z:.5(z&-5 i;o?icyK lt 
*. «t -5 i: <fflfcrt&^tf? < a(z^# < 
^ -r a ?rjsns l j: -7 1 f s fcjfeam^. 



ROUND 


SS 


COMPLETED 


ROUND RECORD - 




TIME 


• 5" '■■" S 


LEFT T Z ME £ 


?S" S^ 





















CONGD<<TUL^T I ONS 


YOU 


H4VE CLE/1RED 4UL ROUND 


ROUND 


RECORD 


L4ST 


PI_ylY 




« . 


•a> 


<?C 


•••?" 


<IO 
























































£?*E* 




3^" 








3S 




SS 






i? *?" 


















.•^* 




5S 


• S" 


s-S 


• S" 




T< 


>T/il_ 


EEC 


ORD 


TOT*. 




-' 


--" 


-- 


■T' ■• 5" 


vS 



























K^^UT'— t*i:x h— ^;uup— Y9<fJ*tf 



rtS-i«>7"5 Ki±S<7)TAKERUlS!t^T-|S3E + T-r, 
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SPRITE 
EDITOR 



tf±A'M ? ) KMzll t\ g-3-T" 
\%^ tz* * =? 1 ^-S-y-A+T- 

5 , —%i / ¥ : btzifi>(F)'y—j\,tfx7' ; 7 
At£ t'T^M t CiSUtz * * ^ ? ? 

6MSX(7)M£CW£^:: 



# & «fc -5 C#-3Tt**j£rti &^ 

Msxv#v>£§i^LT < nxi^ 



*— #— K(7) [SELECT] *— £#H* 

xf-f-y h«£LT(J s *-\- 
HUE, n fc°— # 7 > ? -y f- X'Ms* N 



SELECT 



I SELECT] * - £*f T d* £ C . * — #— 




MSX(7)^7°^-f hliii^l £L 
1 5fe<7)/ \V -y h GO+fr ib v ffi§0) 



~ <7) BACK tH^nt^ 335 
£ N it<^/ \'-y ? <7)fe£%l# 




UOD 



ROL 



TURN 



COPY 



EXIT 



MODE 



t * * y 9 9 - £ JiTS$eT-# S „ 
**5 <? ? — £90/£f O0$£$-ttT 

^ < c 1 80jf T-JiTSIs £ IH u rc'fr, 
f&dl L fc * -V 7 ? ? -£it -5 *§jjif c 

4^ "b * 1* 7 ? ? — <7)fil # ^iiv5t 
?—<nn— K^-tz -7'& £r£fr&' ? 



i [S] SAVE 


f&aLfc**?**— *5 , <**C"fe—7'r*. ! 


i [L] LOAD 


f^fiSLfc+v^^^-^f-'-r *?7r-bn-K-f5„ j 


: [C] CLEAR 


**'J— _fa03* + 7**— 5*— ^fc*-'/?'— f*. ! 


i [E] EDIT 


^77< MfV^CIS, 


i [Q] QUIT 


^7°7-T KxrV?£il7f5, 
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2 

CD 



ft8lH£T'(7)*-^??- 

vjuy— a<7)#— ;Ki 1 /\° 
#— ;wjtff<7>* * 7 ? ? -s 

MODE& 1*3 0>tt % *<7) 



COPY 

^(ZCOPYC035:^?r^ U -v? a 
T5£. COPY(7)X^* <r 7^T 

U* * 7 * 9 -lZ&Rl*-&b1£ 

iUT*>vT; UA,c7)-B#T' 



8-fifylzMfcLtzT-S- 
7—J—i >3>^—Y\ * 

fiMSfaCHJWIWK, i 

7^8 £T'<7)*7°7'f h/< 
? — > MBKUfestt' § 7" 

~y— >a>^E— K^^-So 

^Ct-SctolzLJ:-) 

y, 7^-jwto \-omwv 

3MLA,T'15U\, T\ ^(7) 




%*777^ 0P-K/1Z-7 




KT*£#tt[L]fc*¥1"o 7 



UOD 



±TJ5Ie 




#1 



ROL 



sase 




TURN 

TURN(IfcEP£-& 
% OS Us 180& 

T99feWfc**K:fc 

'J, 360J*T-3lfc7C 




MU 





fctt&J&fr 



•> 3 ><7)UTILITY£fiH , 109-<— v 




4$* Ball Out 107 




ROUND W 

CONSTRUCTION 



3^>S 



3>* h^-> 3 >£^-7Tfe s 

a>^"7f-aU—>a>f;^T) 
*» ZlZfritZo tf-^TO hCO 
7 -5 > K Z'£ (7D r- ? £ g 3-TfF 
ZZttfX'Z&Astzfrh, &hZ\ 

Zff)Z7>ZhZ7?->m>J3\ i 




t7P7l tl'Ttt, * x ;K7) O 



FL00R3 












GRAVITY2 



fS]i;*-^fr§lo^bn?.«lJ|Bil; : 



vs-I'^t'i" -y;/\ -70^.(T)t'n 

ftT^-?>/\°— -y£iiiA,T\ WMz 

fr ?MB^-r § 'j&g#£ < t ffl -? *> 

>Fo>7^7^ya >"C*^ 
tit J". frfr£bJfS/itac =»>* 




• 7^-;u c Jfcffl^J-itU'i 



FL00R2 




• mfe, 7'V— <7>/*. SA<*>«to 



FL00R4 
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===== 


CONSTRUCTION SET 


== = == 


CPD 


PLAV ! 




CLD 


LOAD ALL ROUNDS 




LSI 


SAVE ALL ROUNDS 




CE3 


EDIT 




EQ3 

>■ 


EXIT! EI>ITi-» *> Ti3 




tlJLtti:, " 


7Kt5fr, If-^if< -y t--r-5fr$-C 


r T-iM.i; , 







A^at-bL^H 



;U+— v ya^'T.r-f^i/)^*) 

bX-fc j&st z £ 7j<T- # -S it £\ * 



KEY BOARD 



JOY STICK 



MOUSE 



I SELECT! *—&WtZ:£ C JM 




^r ^«? 


»#•■< 


m ? 


* - tK - K 


SPACE 


ISHIFTI 


ya-fXx-f *y£ 


MJ#-A 


h'Jtf-B 


"7 X 


£^'J^ 


6£'J^ 
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M*v%\y9i/*y<fM*)j 




t£-)\sTO Kiv7>F 1 frh 
8 £ XWl>ti<n* f—& £ U o 
TuT s ten v-yi^-t^m, 
o «fc o izteo X I** t>Vfci)\ 7 

U N 8X8T\ 64®<7)t-*— ?*<& 

fcA,t£tt& Wm<nfflk£LX, 
7t>FZ?£tZ % ^OMOQ^ 
7L%z.thX'£Z><r>tz a 77>^ 



-7 fcftC ti-otz £ Z. h XT, Y -y 7° 

^lt®(3fe?r^^-S>i: s + -V7? 




Etmiii 

I %tnz-&fo-v:x&mtfii-%m£ti 








JbT 




<7>Mfcf*bfc^TWrc 
fc< £ N tztJLlf*-*? 

^ttJ*i:*A^b^^ti* 
/ \*7 if < —iZmA,tzi& 



sssssssssssssssssssssssssssss 

UTILITY 

n>7. Yz7?~>a 
>®®<7)UTILITY<7) 

£ N zco]Ifii5tc&*o 
p.-x-f 'Jx-f-'t 

teWBaV-a (f i **> *<7)fc* 

*„ =iv>Kte^£tlT^5 



** BALL OUT CONSTRUE 
ROUND = 4 

CTD TIME 9 fevf . :<l 

CP3 f^K 7»H" 

CR] 1,3-K OM? 

CC3 -tJiy .-.'.>? Jt CJl 

CSI W^MV ' ' 

1 I 1 ■•-• -I-"',' n I 

I I 'i • ■ i * 1 u 


riON *.♦. 


1 



^b?7> K8 £T£U-£££ 
*!>CU *x— yZti:7?-f 

•fe— 7", P— b'th, 77-fJl/ 

££A2rf *£#£«:. *»r 



sssssssssssssssssssssssssssss 

To R0UND<7):$£y:(i£EPfc"g*> 



ROUND 



sssssssssssssssssssssssssssss 

3.—T- -r U x -c — COT3 v > K 



TIME 




I 



£1\ P-— r-f Uf-f- 
* V 7 ^ ^ — r— ^ ^ □ — 

■V7^ ^—(7)^7^^— K $• 



7 (7) m 
% ~fc 

1" (7) 7 
(7) Z ? 
t- t (C 

4- « £ 



;bi2-T, v7^co?i7r-;^> 
*fctts ^.-<-^*-, v 
a -i TJr -r -y ^ co A ^ ^ >£ 

JfLfcSS, +t7^?- 
=&^li$-&* q ^.^- Hi 
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ow to Ball Out! 



*7J<7>-5 -&tt*»*J8Efc:*-r A#_h# 







roundI 



• *m2fr<D%&HLftW! 



CONGIUTUL4T Z ONS 


VOU H4VE <~l FiWFD 411 BOUND | 


ROUND 


RECORD 


t-JtST M-4V 


M 

O 3 

ss 

OS 
OS 


OS" SS 
S"?- vS 

•s- ■•■? 

■ S" s-S 


SS* ss 
.?.=— S3 

s<j- ss 


TOT/A. 


RECORD 


TOTA. 


c" 


••?" s-S ,= 


» s<»- ss 



8®3:T'? l j:P-T-#-5J: 
<7># 2 ■fl-<7)|| $S*.bft^"} 

»(i1*16U>(!!) tz± 



nrfTl R0UND2 

11 







@^^^>^>^>^>^^^^>^<^^>^^@><^^<S^^<@^^^^ <@*§*@><§x§><§>^<§k§x@k@><Sk@^^ 




round) 




R0UND4 

#tv-£ £Z^fc%it%t>" 
gBSZo tz b n'-;K7)*±.C7)|| 

i:|TT, TlzJSMZikHc 







R0UND5 

ZZttbimztfiTUtz 
fbSLSIt! IH*.WW 
-;U*T1toTLSJd9o * 
&Lfcb3&»l&#bftT, 




^ ROUND? 







R0UND$ 

«fc>MAAWf3afc'. 
*±ATC7)Jli(ZatZSIte5 1+ 

x, hkc^-juca-m, 

j&iat ntf 2 #^c7) ? -r aa< 




ROUNDg 

5fyi;> 4>U££LTfc<<7) 
oHtS®z j f'S-5o 
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]tomm 
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Ball OutttTAKERUrm*!! 




m-)V70^ 



MSX2-MSX (RAM32KULL) 
3.5-T>^2DD(RAM32Km±) 
ffiMS3,000P3 



H; TAKERUT'fcgl^ctf><fc*cFl.\, TAKERU 
(JA7P>7 7 r-<7)gM5^t£LT s ±S 
1 3M&J& \° V =1 > •> a -y 7°fr «£ V±^(T)t 

A<7)Pg(I(i, TAKERU^MSHRTF^n?)^ 

aw T-, &z tz x h ffim f mftxm ^** & 

tt*?M^t STo MSX-7^^>UBISI5T*(ifc 
fcfc\ ^-fs-JUT 7 ^ f- l2TAKERU<7)<fr<7)!6 



TAKERUl-Ol*T<Bl , n% v £*>iHk 

=P467 SSMffififil 
Q052-824-2493 



•••••••••••••••••a 



»••••••••••■••••• 



••••••••;• 



A, 

ft 



6 3-§-<7)#H. 7K^-> 
tits *&C«t-3"CS^L 



f:->->* ; lo^^j:i^ 
<7)7*p?'7A£A7JLT, 



l^jlj«^-<-7-^^ 



RUN [RETURN] T'g it) Wt= 
■/n^A&H&ELSfo 



4 



10 PATCH for TcOOL ERR-MSG No. 

20 CLEAR100. &HAFFF:DBF INTA-Z :A1=&HBFA6 :A2=&HBFE9 : A3=&HBF72 : 

A4=&HC728 

30 PRINT" SET TcOOL DISK (not protect) & HIT KEY PLEASE" :A$ 

=INPUT$(1) 

40 BL0AD"TC00L. B I N" : FOR I =0T022 : POKE Al + I+3. 1+1 : NEXT 

50 POKE A2. &HFD:P0KE A2+1.&H53 

60 RESTORE90 : FOR I =0T03 : READAS : POKE A3+I. VAL("&H"+A$) :NEXT 

70 REST0RE1 00: FOR 1=0T08: READAS: POKE A4+1, VAL("SH"+AS) :NEXT 

80 BSAVE'TCOOL. BIN". &HB000, &HCF49, &HB000 

90 DATA C3. 28,57.00 

100 DATA AF.B2.B3.CA.C9.4F.C3. 76. 4F 
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■5 -ifo ^ J: 1 £'Xfa<fr kjfivc £ 



MENU 
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□HIH5B 




7c cy 1 
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Ll'I'flfffll 



itiTiiffi'nfiTTPign 



-^-hr7'J>h— &V- 




fc £ f (C7- =7 - A A<R|»*,<±ffl# ||(c ^ -, fc p, g £ 



;SS. ft 5tros<b4 , J3 7 ;u^'f at^7 7J= 

LTJH*-T<ft4. ?'7 7IJ, JSttW^E-Ki- 

7«rry>h70 ht5:ttTJ4f s MSX2OT 
^ -f V-^-^LN@^T®*^BASICc7)yn i/7 A 




112 -fe>-y— *-y K 





izyy—%fe-otz?-A 



Touch me! 



MSXv+j"v>H^g|ra2 s -tz> 
ffljftr*«J(ix /l¥«7)$ft eft 

£3:5tf>T, Rffitfo7)t><7>£ft»h 

jtSb^r^J:— fcT*fc«6*fo MIR 



$ ftT i^ P^lot-tr >t>— tfJv -f 

h ^ >x*f&nx m-t&wwtz. 
rttzMzA, t m< % ( j . n l- < # 

t- 7. # <£H 4 5 cox-MftT li ?V 

fit£M#Bl5K«s i£3SBASIC(7> 
CALL HIK^I(SSk) £t*tU&*t\i 

z ftTgrf&n+Cft-fe > H t-coffi 

( 0-255) #!$!#&£ ft*„ IC 
T"IS, 240frT'SlifcHllM<friA<^ 
25(tfTT'^ifc H <7)fit *^40JU±-4 6 
IEfi¥£#&L*CV5o 




Touch me! LIST 



100 " ' 'tflv BY T.T 

1 10 SCREEN5: COLOR, 1, I : CLS: R= INK -TIME) 
120 OPEN "GRP:"F0R OUTPUT AS# 1 
130 FORY = 0T01 1 : LI NE( 1 0, Y* 1 8+ 10) - ( 1 0+ 1 8* 1 
1, 10+18*Y), 12:NEXT:F0RX=0TOl 1 : LINE (X* 18+ 
10,10)-(10+18*X,10+18*11), 12:NEXT 
140 ' 

150 LINE (2 20, 1 10) -(235, 125), 15,BF:K=90 
160 PRESET(210,80):PRINT#1,"START" :_HIKA 
RI(H):IF H<40THEN160 ELSE LINE( 2 1 0, 80) - ( 
250, 125), 1 ,BF:CT=0:HT=0 

170 PRESET(96,0) : PRINT# 1 , " / " :G0T0 320 
180 ' 

190 R = INKRND( 1 ) * 1 0) + 1 : X= 1 1 +R* 1 8 : R=INT( R 
ND( 1)*10)+1 : Y=l 1+R*18 

200 R=INT(RND( 1)*10) :IF R=5 THEN CL=7 EL 
5E CL=15 

210 LINE (X,Y)-(X+16,Y+16),CL,BF 
220 ' 
230 1=0 

240 1=1+1 :_HIKARI(H):LINE ( 240, 1 0)- ( 2 1 0, 
2), 1,BF:PRINT#1,H 

250 IF H>40 THEN 270 ELSE IF I>K THEN 30 
240 



ELSE 
260 ' 
270 IF 
CL2 = 8 



CL=7 THEN CL2=4:PLAY"02V15C" ELSE 

BEEP 

280 LINE (X,Y)-(X+16,Y+16),CL2,BF:FOR L= 
TO 100:NEXT L:IF CL2=8 THEN HT=HT+1 EL 
SE HT=HT-3:CT=CT-1 
290 PRESET ( 60, 0) : PRI NT# 1 , HT 
300 ' 

310 LINE (X,Y)-<X+16,Y+16),1,BF:CT=CT+1 : 
K=K-4: IF K<10 THEN K=10 

320 PRESET ( 1 1 0, 0) : PRI NT# 1 , CT : I F CT=30 T 
HEN 140 ELSE 180 




• x?- t-<otz*>izym>-v-T-t&ti 






■fe>i+- *-?*•* 113 







&fcotz/T-U 



tz ILT r ^7 ! l )>tfV Itt 
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:^^t 



^+Z >+f-(7)fI^ y □ 9 '=? A Eja 
Ti#&(lCJ N CALL OTO(g!ifc) £ 
1"ti(3fJ:-5 Ll\, LIST<7)330frT' 
(i_OTO (W)^ nCoTl^-S>;!3\ CALL 
(i_ ( T > ?"-/ \-) Tftffl T*# 5 

^.t4LisT*i;-5< »;tj,x, mn 

LT(5Ll\, g-9-T'7°P^vA-r 










■>/| U>7K£ LIST 



100 ' •;>*■ * by T.T 

110 SCREEN 2,3:CL=4:COLOR ,CL, 1:CLS:T=0 

:TH=0:U=0:DIM H(2, 1, 1 ) :0PEN"GRP: "FOROUTP 

UTAS#1 :CN=0:LINE(O,142)-(255,160),9,BF 

120 ON SPRITE GOSUB 440:SPRITE ON : FOR J= 

TO 8:SP$(0)=" " :SP$( 1 )=" " 

130 FOR K=0 TO 1 : FOR 1=0 TO 1 5 : READ D : SP 

$(K)=SP$(K)+CHR$(D) :NEXT I : NEXT K:SPRITE 

$(J)=SP$(0)+SP$( 1 ) :NEXT J:GOTO 420 

140 DATA 0,0,0,0,0,1,2,2,1,1,1,2,4,8,16, 

48, 0,48, 72, 72, 48, 64, 192, 168, 16, 0,2 40, 16, 

32,64,32,0,0,0,0,0,0,0, 1,0, 1,1, 1,1,1 

150 DATA 2,4,6,0,48,72,72,48,224,192,192 

,128, 64, 128, 64, 32, 32, 32, 48, 0,3, 4, 4, 3, 2, 6 

,10, 11, 9, 5, 1,1, 2, 4, 6, 0,0, 128, 128, 0,0 

160 DATA 0,0,0,0,128,64,32,32,32,48,0,0, 

0,0, 6, 9, 9, 6, 4, 3, 5, 8, 6,0, 1,7, 0,0, 0,0, 0,0, 

0,0, 0,0, 128, 128, 64, 32, 192, 0,0, 0,0, 0,0 

170 DATA 0,24,36,36,27,5,8,6,0,1,7,0,0,0 

,0,0, 0,0, 0,0,0, 128, 128, 64, 32, 192, 0,0, 0,0 

,0,0, 0,0, 0,24, 36, 37, 26, 1,0, 1,0, 0,0,0 

180 DATA 0,0,0,0,0,0,64,128,120,152,96,1 

92, 0,0,0, 192, 192, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 

,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

190 DATA 0,0,192,192,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

, 2, 1,97, 146, 148, 111, 4, 8, 16, 96, 0,0,0, 48, 1 

6, 16, 32, 32, 33, 67, 204, 48, 0,0, 0,0,0 

200 ' ' 

210 1=0 

220 IF H(I,0,0)=0 THEN 250 

230 1=1+1 : IF 1=3 THEN RETURN ELSE 220 

240 ' ' 

250 12 =0 

260 IF H(I2,0,0)=0 THEN 280 

270 IF H(I2, l,0)>(220-50) THEN RETURN 



280 1 2 = 1 2+1 : IF I2<2 THEN 260 ELSE H(I,0, 

0)=1:H(I,1,0)=211:H(I,0,1)=110 

290 RN1=INT(RND(1)*5)+1 : IF RN 1< 3 THEN H( 

I , 1 , 1 > =6 ELSE H(I , 1 , 1 )=7:RETURN 

300 ' ' 

310 FOR 1=0 TO 2:IF H(I,0,0)=0 THEN H(I, 

0, 1 )=217:GOTO 320 ELSE H( I , 1 , 0) =H( I , 1 , ) 

-6:IF H(I, 1,0X50 THEN H(I,0,0) = 

320 PUT SPRITE I , ( H( I , 1 , 0) , H( I , 0, 1 ) ) , 8 , H 

(1,1, 1):NEXT: RETURN 

330 _OTO(W) :SPRITE0FF:LINE(96, 155) -(60, 1 

46),5,BF:PRINT#l,W:SPRITEON:W=INT(7*(W/2 

56))+l :RN=RN+1 : IF U=12 THEN W=W-1:U=0 

340 IF W<6 THEN U=0 

350 0NWG0SUB370,380,390, 390,400,400, 410 

360 PUT SPRITE 3, ( 60, 1 1 0) , 1 0, P : LI NE (72, 

1 12)-(88, 1 20 ),CL,BF: RETURN 

370 P = RN AND 1 .'RETURN 

380 P=2:RETURN 



390 
400 
410 
U+l 
420 
430 
330 



P=3:RETURN 
P=4:RETURN 
P=5: PRESET 
RETURN 



(72, 1 12) :PRINT #1, "t>! " : U= 



GOSUB 200:G0SUB 330:G0SUB 300:GOSUB 
:T = T+1 :LINE ( 96 , 64 ) - ( 64, 56 ) , CL, BF : PR I 
NT #1,T:G0T0 420 
440 ' ' 

450 SPRITE 0FF:CN=CN+1 : I FCN> 1 OOTHENCN=0 
460 PUT SPRITE 3, ( 60, 1 1 0) , 9 , 8 
470 PRESET ( 64, 1 04) : PRINT #l,"r«, !" 
480 IF T>TH THEN TH=T : LINE( 1 56 , 64) - ( 1 26, 
56),CL,BF:PRINT#1,T:T=0 ELSE FORL=0T02:H 
(L,0,0)=0:PUTSPRITE L, (0,2 17), ,0:NEXTL 
490 FOR L=0 TO 170:NEXT L:LINE (64,104)- 
(96, 1 12) ,CL,BF:SPRITE ON : RETURN 
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Heat balloon LIST 



100 ' '****> by T,T FOR 0ND0 

110 SCREEN 5, 1 :C0L0R,5, 1 : Y=80:DIM H(2,l, 

1) :CLS:0PEN"GRP:"F0R OUTPUT AS#1 

120 T=0:TH=0:LINE (0, 1 32 ) -( 255 , 160) , 9, BF 

:ONSPRITEGOSUB 330 : SPRI TEON : FOR J=0 TO 2 

:SP$="":FOR 1=0 TO 7 : READ D : SP$ =SP$ t CHR$ 

(D):NEXT I 

SPRITE$(J)=SP$:NEXT J:GOTO 310 
DATA 2 4, 102, 129, 129, 129, 102,24,60 
DATA 192,124,68,124,64,126,1,170 
DATA 144,83,60,252,63,24,36,66 



130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 



1=0 

IF H(I,0,0)=0 THEN 210 
I=I+1:IF 1=2 THEN RETURN ELSE 190 
B=1-I:IF H(B,0,0)=0 THEN 230 
IF H(B, l,0)>(230-90) THEN RETURN 
H(I,0,0)=1:H<I,1,0)=2 30:H(I,0,1)=5+I 
NT(RND( 1 )*120) : RETURN 
240 " 

250 FOR 1=0 TO 1 : IF H<I,0,0)=0 THEN H(l, 
0, l)=217:GOTO 260 ELSE H( 1 , 1 , 0) =H( I , 1 , 0) 
-10:IF H(I, 1,0X50 THEN H(I,0,0)=0 
260 PUT SPRITE I , ( H( I , 1 , ) , H ( I , , 1 ) ) , 1 5 , 
1 : NEXT: RETURN 
270 ' ' 

280 _ONDO(W) : LI NEC 74, 150) -(40, 143),5,BF: 
PRINT#1,W: Y=Y+(50-W) :IF W>75 THEN W=75 
290 IFY<10THENY=10ELSE1FY>120THENY=1 10 
300 X=70+INT(RND( 1 ) *5 ) - 1 : COLOR= ( 10,W¥15 
,0,5-W¥15):LINE<160, 150)-(1 16, 143),5,BF: 
PRINT#1,T:PUTSPRITE3, (X, Y), 10,0: RETURN 
310 ' ' 

320 GOSUB 170:GOSUB 
270:T=T+1 :GOTO 320 
330 ' ' 
340 
350 



270:GOSUB 240:GOSUB 



SPRITE OFF:PUT SPRITE 3,(X,Y),8,2 
IF T>TH THEN TH=T:LINE < 230, 150)- < 1? 

6, 143),5,BF:PRINT#1,TH 

360 FOR L=0 TO 2 : H( L, , ) =0 : PUT SPRITE L 

, (0,217),0,0:NEXTL:FORL=0TO170:NEXTL 

370 SPRITE ON:T=0:RETURN 
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SCREEN 2,2:C0L0R t5,ft,0tCLS 

CLEAR 3000, ScHBFFF '.GOSUB 1430 :DEFUSR1=&HC000 

T=0:MO=4:GOSUB 1410:OPEN "GRP:" FOR OUTPUT AS #l:GOSUB 

/ */77°7<h i^9-^ tfh /* 

RESTORE 1740 

FOR J=0 TO 9:A$="" 

FOR 1 = 1 TO 32 :REAB 

SPRITE$(J)=A$:NEXT 

'*/ :/3*tH7M /* 

X=128 : Y = 153 :KP=0 :M=0 :N=0 :CU=0 :BY=0 :GOSUB 1 180 

'*/ M;>%-rj & *- ZiWzl /* 

GOSUB 1650 

SN=STRIG(T) :IF SOOSN THEN M=-SN:SO=SN :IF SN=0 THEN ST 



D$ :A*=A$+CHR$ (VAL ( "&h"+Df ) ) :NEXT 
J: 



1000 
1010 
1020 

1490 

1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 

1120 

=1 

1130 D=STICK(T) :X = X-(B>1 AND B<5 AND X<174) *MO+ (D>5 AND D<9 
AND X>66)*M0:Y=Y-(D>3 AND D<7 AND Y<150) *MO+ ( ( (D=l OR D=2)0R 

D=8) AND Y>56)*M0 
1140 IF N=l THEN CU=CU+1 :ST=0 :GOSUB 1200:GOSUB 1330:IF CU=25 

THEN GOTO 1710:ELSE GOTO 1120 



1150 
1160 
1170 
1180 
1190 



GOSUB 1180 
GOSUB 1330 
GOTO 1120 
'*/ t b 7= 
IF X<72 AND 



YM52 



/* 
AND 



KO=l THEN BEEP :PUT SPRITE 0,(0,: 



09):PUT SPRITE AO , (8 ,50) ,8 ,5:KO=0 :KP=KP+1 :GOSUB 1600 

1200 PUT SPRITE 2,<X,Y+16) ,15,2 

1210 PUT SPRITE 3,(X,Y+16) ,1,3 

1220 IF BYM28 THEN N=l 

1230 IF h=l AND (XOXO OR YOYO) THEN BY=BY+2:G0T0 1290 

1240 IF M=l AND X=X0 AND Y=VO THEN BY=BY+1 :GOTO 1290 

1250 XO=X:YO=Y 

1260 IF KO=l THEN GOSUB 1325:PUT SPRITE 0, (X , Y) ,P ,4 :PUT SPRI 

TE 1,(X,Y) ,11,N:RETURN 

1270 PUT SPRITE 31, (X, 209): PUT SPRITE 1 , (X , Y) , 1 1 ,N : IF ST=1 

THEN ST=0:GOSUB 1350:IF AO0 THEN GOTO 1310 

1280 RETURN 

1290 PUT SPRITE 1,(X,209): PUT SPRITE 31 , (X ,Y) ,7 ,N :GOSUB 163 



1300 RETURN 

1310 PUT SPRITE A, (0,209) :AO=A:GOSUB 1325:PUT SPRITE 0,(X,Y) 

,P,4:K0=1 

1320 RETURN 

1325 IF A0=4 THEN P=l :ELSE P=8 

1326 RETURN 

1330 '*/ 11\f 1 OlTJR /* 

1340 DUMMY=USR1(D) zRETURN 

1350 '*/ \Xjf4 %-fj /* 

1360 A=3:B=0:FOR I=&H1B10 TO &H1B24 STEP 4 

1370 A=A+1:IF VPEEK(I) XY-4) AND VPEEK ( I X ( Y+4) THEN IF VPEE 

KII + DXX-4) AND VPEEK(I + lX(X+4) THEN B=A 

1380 NEXT I 

1390 IF B=0 THEN A=0:ELSE A=B 
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1400 RETURN 

1410 '*/ 37 # W ^Ii/t7>f7 m /* 

1420 FOR 1=4 TO 9:PUT SPRITE I , (0,0) ,1 :NEXT I :RETURN 

1430 '*/ TSTjT t^h /* 

1440 RESTORE 1950 

1450 AD=&HC000 

1460 READ D$: IF D*="END" THEN RETURN 

1470 POKE AD,VAL("&h"+D$) 

1480 AD=AD+1:G0T0 1460 

1490 '*/ tTt'j li?4 /* 

1500 LINE (160,20)-(224,28) ,8,BF 

1510 LINE (0,48)-(255,169) ,5,BF 

1520 LINE (0,44)-(255,46) ,4,BF 

1530 LINE (0,70)-(255,70) ,1 

1540 LINE (0,171)-(255,191),4,BF 

1550 CIRCLE (70,180) ,10, 11, ,,.8 

1560 PAINT (70, 180), 11 

1570 CIRCLE (70,180) ,8,4, ,,.8 

1580 PAINT (70,180) ,4 

1585 PRESET (83 ,20) .-PRINT tl/ttfl (J) llfft" 

1590 '*/ 4-j*j~1-9 7" t3*/" /* 

1600 LINE (20,20)-(64,30) ,1,BF 

1610 PRESET (20,20) :PRINT #1,KP;"D$" 

1620 RETURN 

1630 LINE (224,28)-(224-(BY¥2) ,20) ,1,BF 

1640 RETURN 

1650 '*/ Ml* talv* /* 

1660 PUT SPRITE 4,(0,208) 

1670 PRESET (80,74) :PRINT #l,"fcz7! ??V}- n 

1680 PRESET (80,92) :PRINT tl ,"&!"« t<l»" 

1690 PRESET (72,108) :PRINT #1,"HIT SPACE KEY" :G0SUB 1590 

1700 IF STRIG(T) THEN LINE (72,74) -(190,120) ,5, BF :RETURN:EL 

SE 1700 

1710 '*/ GAME OVER taOiT /* 

1720 PRESET (92,92) :PRINT #1,"GAME OVER " :F0R 1 = 1 TO 1000 :NE 

XT I 

1730 GOSUB 1490:GOTO 1090 

1740 '*/ SPRITE DATA /* 

1750 DATA 1F,3F,7F,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,7F,3F,1F 

1760 DATA F8,FC,FE,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FE,FC,F8 

1770 DATA 1F,3C,7C,FC,FC,FC,FE,DE,C0,C0,C0,E0,F0,78,3D,1F 

1780 DATA F8,5C,E,F,3,3,3,1,3,1,1,3,1,82,84,F8 

1790 DATA 0,0,0,0,6,E,1D,1B,3F,3F,3F,3F,3F,1F,1F,F 

1800 DATA 0,0,40,40,50,D0,B4,74,EC,DA,F6,FC,F8,F0,E0,C0 

1810 DATA 1,1,1,7,9,11,22,24,40,40,40,40,40,20,20,10 

1820 DATA 80,C0,A0,B0,A8,2C,4A,8A,12,25,9,2,4,8,10,20 

1830 DATA 0,3,2,F,1F,39,7E,D5,D7,F5,76,35,F,4,7,0 

1840 DATA 0,80,61,13,E7,F5,BB,DF,BD,FF,FB,CD,A7,23,C1,0 

1850 DATA 0,0,87,C8,E7,AF,DD,FB,BD,FF,DF,B3,E5,C4,83,0 

I860 DATA 0,C0,40,F0,F8,9C,7E,A6,EB,AF,6E,AC,F0,20,E0,0 

1870 DATA 1,1,1,79,C6,6F,7D,CE,F6,F7,DD,AE,B6,FB,FE,78 

1880 DATA 0,80,40,60,F0,D8,BC,E2,FF,C0,E0,D0,90,20,C0,0 

1890 DATA 0,1,2,6,F,1B,3D,47,FF,3,7,B,9,4,3,0 
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2100 
2110 
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DATA 80 ,80 ,80 ,9E ,63 ,FD ,BE ,73 ,6F ,EF ,BB ,75 ,6D ,DF ,7F , IE 
DATA 71,FE,CF,FE,F6,ED,D7,B6,AE,5D,27,19,1,1,1,1 
DATA 80,40,20,A0,A0,C0,C0,FF,E2,6C,D8,70,60,40,80,0 
DATA 1, 2, 4, 5, 5, 3, 3, FF, 47, 3D, IB, E, 6, 2, 1,0 
DATA 8E ,7F ,F3 ,7F ,6F ,B7 ,EB ,6D ,75 ,BA ,E4 ,98 ,80 ,80 ,80 ,80 

' ivjT f m -9 

DATA 3E,00,32,28,C2,DD,21,04,C2,FD,21,10,C2,26,1B,3A 
DATA 28,C2,C6,04,CB,27,CB,27,6F,CD,4A,00,FE,D1,CA,C5 
DATA CI ,CD ,3A ,C0 ,3A ,28 ,C2 ,FE ,05 ,C8 ,3C ,32 ,28 ,C2 ,DD ,23 
DATA DD,23,11,04,00,FD,19,C3,0D,C0,21,D7,C1,DD,7E,00 
DATA CB,7F,C2,48,C0,21,EB,C1,E6,7F,CA,5E,C0,47,11,05 
DATA 00,19,10,FD,DD,4E,01,06,00,09,4E,C3,6D,C0,DD,7E 
DATA 00 ,CB ,7F ,C2 ,6B ,C0 ,0E ,84 ,C3 ,6D ,C0 ,0E ,45 ,CD ,CC ,C0 
DATA DD ,7E ,01 ,FE ,04 ,CA ,7D ,C0 ,3C ,DD ,77 ,01 ,C9 ,DD ,7E ,00 
DATA E6,0F,FE,03,D4,C2,C0,CD,B4,C1,0F,D2,9B,C0,0F,D2 
DATA A0 ,C0 ,0F ,D2 , A9 ,C0 ,3E ,03 ,C3 ,B0 ,C0 ,3E ,00 ,C3 ,B0 ,C0 
DATA 0F ,D2 ,AE ,C0 ,3E ,01 ,C3 ,B0 ,C0 ,3E ,04 ,C3 ,B0 ,C0 ,3E ,02 
DATA DD,46,00,CB,78,CA,BA,C0,CB,FF,DD,77,00,DD,36,01 
DATA 00,C9,DD,7E,00,17,3F,1F,DD,77,00,C9,FD,7E,01,FE 
DATA 08,DA,8D,C1,FE,E8,D2,73,C1,CD,16,C1,FD,77,01,FD 
DATA 7E,00,CB,21,CB,21,FE,36,DA,24,C1,FE,9A,D2,40,C1 
DATA CD,16,C1,FD,77,00,79,E6,3C,FD,77,02,00,00,00,00 
DATA FD,E5,E1,16,1B,3A,28,C2,C6,04,CB,27,CB,27,5F,01 
DATA 04,00,CD,5C,00,C9,CB,79,C2,21,C1,CB,71,C8,C6,04 
DATA C9,D6,04,C9,F5,DD,7E,00,FE,81,CA,67,C1,FE,83,CA 
DATA 67,C1,FE,01,CA,5C,C1,FE,03,CA,5C,C1,F1,C3,F0,C0 
DATA F5,DD,7E,00,FE,82,CA,67,C1,FE,84,CA,67,C1,FE,02 
DATA CA ,5C ,C1 ,FE ,04 ,CA ,5C ,C1 ,F1 ,C3 ,F0 ,C0 ,DD ,36 ,00 ,00 
DATA DD,36,01 ,00,C3,6F,C1 ,DD,36,00,80,DD,36 ,01 ,00, Fl 
DATA C3,3A,C0,DD,7E,00,FE,83,D2,AE,C1 ,FD ,7E ,00,FE ,70 
DATA DA,88,C1,3E,83,C3,A4,C1,3E,84,C3,A4,C1,DD,7E,00 
DATA FE,03,D2,AE,C1,FD,7E,00,FE,70,DA,A2,C1,3E,03,C3 
DATA A4,C1,3E,04,DD,77,00,DD,36,01,00,C3,3A,C0,FD,7E 
DATA 01,C3,D9,C0,ED,5F,0F,0F,0F,0F,6F,ED,5B,29,C2,19 
DATA 22,29,C2,7D,C9,DD,36,00,80,DD,36,01,00,FD,36,01 
DATA 08, FD, 36, 00, 32, FD, 36, 02, 05, C3, 24, C0, 69, 69, 69, 69 
DATA 69, 57, 57, 57, 57, 57, 45, 69, 28, A4, 84, 45, 57, 16, 94, 84 
DATA AB , A8 ,A8 , A8 , A8 ,96 ,96 ,96 ,96 ,96 ,84 , A8 ,29 ,65 ,45 ,84 
DATA 96,17,55,45,80,00,80,00,80,00,80,00,80,00,80,00 
DATA 46,59,04,01,46,69,04,08,46,79,04,08,66,89,04,08 
DATA 66, 99, 04, 08, 66, A9, 04, 08, END 
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fflit<nt$tz&i)&tf B 
r #]tf)£LT *A(J£i!E&li*± 
Si^SftU «T-MSX£-mA,rp(;:£ 
>g L T l *5 t (7) T'To ft* T1 J % 

HOLNOTE, y— At4#RJWl II s 
£s&JYRM-31 t s 4-T'tiMSX^L 

fiot, fA<75Hl *J (z(i ~ <75 J: -5 nc 

-y-^L^x-r, Msx-7^v>i±_b 

(^£H]f*<7X LA^MIDIBHf^ 
fco WA^(iSTiitfc£i!iJE(tT 

jo IbVtftnz-g 

£-\£A,b\ DX-7, S90CK 
RXH D110fctt7)(tyl 
£>^T, MSX^WjgSi 

tz s J—~7<7)l5*Mfr 

VT^tztzZZLtzt 

Zh, -^tb&fc*^ 
t(T)htz'-)(r)^^t i -y' 




nnmnn 



fBIT'OTFMPACffl ; a-vvi'Xx-f 9 •> > * "It JU * . , lHUgfelf -r v h i 



-rtb*T-c-?^Lfc 

28^ c ^'j^-r^x.s fc5t-<*A, e 

MSXT'MIDI^ £l^;*lJ x 4- 
T'feBI^fT'^#ST aM&lttfcMSX 
T'0)MIDh>;* r\Mi N 1'^/\(7)CX 

•> u -x'^yis-> u -x^-* £ 

Lfcfc<7)LA % &»JS-t*A, *ftfc* 

MSXT*MIDI£oT % ¥A,fc£t; 
Tl^MPU£H|N#h,2>MIDI(7H > 



?3t- ZXZ X%S='^^(D\y^i\y 

x\ mMxzxLti&X'to h 

t* ftlCfffl(7)77 hfcfftltf 
W/7 HT^*\ ? 

Msx±x*<nmm.<nr$m& t'*t; 

sbx<r>im.x\ i^i^^WL 

HXj v- pf^-a *, *> frfr !? £ fr 
\.^l&M.hM £Tfi\ "tzKt 

*— s i b>±itmW.£tzhtt<,z 
> UViLtZo MX"X\ FMPAC<7)=g 

%.<7)&frb t^0ZiHZt£t)£t 
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FMPAC^lnvn^E/li, tztz 
ff)FMtif/N"7 ? TOfc < T s S- 
RAM#A,*Pfc*b>TVt; ^r-A 
<7)-tz-7/n- KtfAASzfctt*.* 

—fcfrhs S-RAMC0^(7)lSMt-ti 

bs f;w^v7>i£f&isfflA,T'^b 

FMPAC^7.D'y hC3feo&A,T 

^ s UXA^5tftli:77 7 
LTPSG^^ 6 + 5 + 3T-14 

£ Lf:b, FM^MV)* Urf-i — 0* 
9 ^ftUT 7 7. LTPSG 3 ^T* 
12$fc N ft*. 
^fe£LT(J, 64^7°'J-tz-y 

1 Wzmt St>T'Xt< -y h T*# 

U-?77it ZC7)FMPACtZ^ffl? 
nTl^<7)(i 2 tf"^— ?C7)FM^ 

m?$B. tz tx.\,£'<)\'<n& i ft* 






BASICOOZl v> K 

It/* Wk^hh 

aPLAY2SC<7)t!£gi 

£LT „ At 

£S7lf &*,*£#£ 

^FMPAC^&^O 
FMPAC£|W]B##g 

Z(7)2=l^$)^-^ 

i*#i*u *A,#7P?7Afc£ 
'J **.■? C0?fltf3$& LT t^&u 
<DX\ tmffiiz «bThI £ ^ -5 i: c 
*> £ X- LfrW*. K^A,tLTj t* fe- 

PLAY<7)*5t£ £* "9 ^MT*llJ* 

it^i. T*<7)PLAY3fi:t H UT'l^lv 

tz a ?IX S tcDMwLX^^tz 
Xrt<7)»i»£g£a.T*>*fc:ltT\ 

£{*«CT*#Tlv§A,£:(t£\ 

i^/L-t^BAsicTti^a^T-'- 



tlfc'ttr<fcl^-«XD 




♦ CALL MUSICS I ^<7)A\ FMWSfcJet&L 

frt^-ifSLfcft'^J 1 —?* ztnzi— -y— its 



(to LTV- i/JW)^- vT1J£lM7)T\ 

ii:fc'Ji;'j;uj:-Ttx.TJ5LTfcb7lH 



CALL V0ICE(@i6,ei6,@39,@39,@48,@48) 



• CALL VOICE T\ ^££->£:£T"5> A-fc'o & 

fcUfcfc. Ax SlJ(-1§L^4-^ltt' c ^c7)^C0 
ft^A^feft-to 16#lSc"77 7*>, 39# 






imoztzteo 48#lJ*;i/>£. 77 1-7- 
3 T'tis 6 ^(iC " izWcM L fc^TSg/S L 



^liftfc^%^-S)Cc:T'LT v 
£■*, - <7)FMPAC<7)FM^^fflW 5 

4-I!£<7>|f $&T'(J* Bit 2 7^b<7) r v 

t\ ®.mi*tefrtefr^frtzi.\ 

? KLTV.v< fe*,^^§^A* 

X(Ds i'-'T>y—tLXbi$.z. 



MSX<7) MIDI M il fe fe *> ^» A,iio 
^ltT^#f-TA\ FM^^T-fcy 

(J s Mfax-fel^LT, JS16L 

T*«t-7*^©oTfc'j*-ro fc 

$kLfr\.zt^n£zh-> ! 









■■^^■■■■■■■■■^■■l 




10 


SCREEN 0: KEY OFF 




20 


REM 




30 


REM 




40 


PLAY"14cde" ,"14e-fg" , 
"1 4gab" 




50 


PLAY"cde" ,"efg" ,"gab" 




60 


PLAY"edc" , "ef g" , "gab" 




70 


PLAY"edc" ,"e-fg" ,"gab" 




80 


PLAY"! lc" ,"1 lc'V'l lc" 





J/E3RBASIC 



10 SCREEN 0: KEY OFF 
20 CALL MUSIC (0,0,1 ,1 ,1) 
30 CALL VOICE <@20, ©39, @48> 
40 PLAY#2,"14cde" ,"1 4efg" , 

"14gab" 
50 PLAY#2,"cde" ,"efg" ,"gab" 
60 PLAY#2,"edc" ,"efg" ,"gab" 
70 PLAY#2,"edc" ,"efg" ,"gab" 
80 PLAY#2,"1 lc" ,"1 lc" ,"'l lc" 



Tjl) IJ/CALL MUSIC" t "CALL VOICE", t LTPLAY^^C7){$C " = 2" 




P 
PAC 




J3 






* 
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Vi±WifX^^ xy J^T ~ m<Jmm ^ WgTOtlZcfcSSLWWo SKMI/tt "ffl*&an^\ 



c^ilMalCOttcr&fco #5<£o£, fctttfSbritefcOrcUrAc 




* — # — *— * # 


















**>- _ -*• ==:= 






* 



** * 




iFMffliS&BSfek 

:tT\ f$Mffi(i, a— ktMWt 
t**3B9KK:LT**Lfco ±#* 

0>y*h fr^£- s i*##»j fc 
1 FMfcSIJBG LTLIo fcOf^ 
FMPAC*JH\Lfc7 r *»y*CW; 

SCPpI! fctt^AT-L J: •) ? 

<7>l££(7) t ~ *> T- 6 #Mffl£ & -a 
fto IrIC^^s ZL-v"">T-tHLT v 



frb, CALL VOICED i:Z^T% 

PSG(7)<fr<7)£# £(2, fe-5-tf-f 
* ? 3 #<%a*-3 o '5 £ TSfrc: fc 

T'f^? LA V U MSXc7)7-r> 

Co^'^T; ifi^^t — *— T* 
1.1b LT^Si:, t£frt£:fr-*yt£ 

-<7)FMPAC^T-\' > y(i 
S0FT<7)£::^(I&5 % MSXIfV 

-7i7t</ n';k;#*b l T^n 

(fl^^o *~THS> FMPAC£f£ 



tbLT<n-5^--y Vtf&ZMz 
(2, FMPACM^ffl L fc 7°n y^A 



FMPAC&g-?, £ 




POflMMI 
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'<SQ MUSIC KS 



fc**.S»;tTS*LT, f-L^A,T 
■ftao MSXT'C7)MIDI(7)i6^ ( ^:'^, 
FMPAC<7)ffi^Uo KafcCfes 51^ 

i^U+^k^&JtfrLT/z'J LX 

WTfc 'J £ "To *A,fc*W* 
bA,£#Z'gA,1t/M msx^^i; 

T\ Ml£k±itf>iAA,T". FMPAC£ 

■/y&A,T\ ^s %A,tztt<nb<n 

xt it £, * -5 1 n ^ xfpie^i: i * 

LtztzMZ%x.X^£? 
fats Z<7)zi— x— CMtiO 

7°b, z<nmzfrhT&-3X<tz$ 




Ut*l& x^x— 7flS5*T*t> 

$$->/;f- ~fm4pfrhs 1"<**x 

<7D*-b'y HZ* tubX^-oh^o 
KA,XZ.£h%x.X^&To 7ti 

*--H\-5±jliz/-/T </££&;£, 

£ L £* L Z5tK < fc*$ I \, &'&% 




i 



For PSG 

£<7> 'J 7. Ki, FMPACfflTT= O— Z fctt, FM^igffl 
TTfco Zft£PSGT*,i:A,£A x Lf:V.*i:i,nAlJ* 
©20*t£3Wt £12-? T L- S #5 1 «, 
l)8C»T~100fr£T'tK Bl^TLifcOo 
d}13Off0>x— ?&/>< 6 -2&5C0£ 3 Olio £ -3 T PSG 

i:*>(05t^04)CjS"fo 




SISpn^OlttMi: 



10 SCREEN 0: KEY OFF 

20 CALL MUSIC (0,0,1 ,1 ,1 ,1 ,1 ,1) 

30 CALL V0ICE(@16,@16,@39,@39, 

,<*48> 






@48 



40 
50 
60 
70 
80 
90 



SL=8:DIM Sf(3,SL> 

FOR 1=0 TO 2:F0R J=0 TO 

READ S*(I ,J) :NEXT J, I 



SL 



FOR 1=0 TO SL 
S*(3,I)=S*(2,I) :NEXT 

100 S*(3,l)="vl4<"+S*(3,l) 

110 ' 

120 FOR 1=0 TO SL 

130 PLAY#2,S*(0,I) ,S*(1 ,1) ,S*( 

) ,S$(3,I) ,S*(0,I) ,S*(1 ,1) 

140 NEXTrGOTO 120 

150 ' 

160 DATA 

170 DATA 

180 DATA 

190 DATA 

f4„ 



,1 



tl28vl5o518 
gl6ggl6gggga-~2 . 
gl6ggl6gggga-2 . 
>cl6ccl6cd4.e~16e--e-16e- 



200 


DATA 


e-16e-e-16e-d4 .e-2 . 


210 


DATA 


f 2.e2. 


220 


DATA 


dl6ddl6dddde2. 


230 


DATA 


•f 2.e2. 


240 


DATA 


di6ddl6dddde-2. 


250 


i 




260 


DATA 


tl28vl5o51 8 


270 


DATA 


e-16e-e-16e-e-e-e--f 2 . 


280 


DATA 


e~ 1 6e~e- 1 6e— e— e-e—f 2 . 


290 


DATA 


gl6ggl6ga-4 .b-~16b-b~16b- 


>c4 






300 


DATA 


<b-16b-b-16b-b4.g2. 


310 


DATA 


>c2.c2. 


320 


DATA 


<bl6bbl6bbbb>c2. 


330 


DATA 


c2.c2. 


340 


DATA 


<bl6bbl6bbbb>c2.< 


350 


/ 




360 


DATA 


tl28vl2o41 8 


370 


DATA 


c2.d-16d-d-16d-d-d-d- 


380 


DATA 


c2 .d-16d-d-16d-d-d-d- 


390 

6a- 

400 


DATA 


e-4 . -f 1 6-f -f 1 6f g4 „ a- 1 6a-a- 1 


DATA 


g4 .g 16gg 16gc 16cc 16cccc 


410 


DATA 


al6aal6aaaagl6ggl6gggg 


420 


DATA 


gl6ggl6ggggcl 6c cl 6c ccc 


430 


DATA 


al6aal6aaaagl6ggl6gggg 


440 


DATA 


g4.gggcl6ccl6ccl6ccl6c 
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*i-h^— ?«SB8L.5*>33! 



J 



r> T # fc<7)T\ Q-Wlfrh (i^ cfc l* 

$fU^>*xA(r£U, I&jfc $f 
T 7 **— *-y hMSXCKJ, 100££8 

x. § b BSCVHEHEQ #* 'J x *»* 

U&#£lV7)T\ £'tl£J|7cb^ 

£1\ ft^MfcBBStKJ, SIG 
(Special Interest Group) t*H£ 



2DJ 



>"H*k *tf- i A Jfcfo 'h 

tztA.it, ^^C7)^(Z(J^7->-y 

^vt X a -y ? ### >Jf a fe I * 
i^fc<'Au &A.£t*oT^ 

ftafeOTq L* A<7)H i u £& b N t 

FX+-^-y hMSX(7)BBS(;(i 
£0) 3 5 A T-fc§y> L T U§ fc C7)<7) 

^-•>3>^^-'y h9— ^±TS 
U#tfTT"# 5 •> a -y t°>?\ iv^ 

ia5 &WGB L-g-i *£fiff%:bti 

£'<7)CUG (Closed Users Group) 
£WtiZ>b<7)b&Z<ntz' 




Bssm 



TJtHHOSchoors "but! 




§& 5 S>:*<7>3Wt8G£teB* y 

-*£«fc 7X*-^-7 hMSXOMSX 
■7*^>ISIS|50SIG(7)+^**o 



SIG 



rc<£-Ub3SIG(7)4^b, ifft 

«:J»rnfrir>TLnit^ ~ 
-3TU*SIGtt<7)fc*„ MSXc7>^-a 

1\ 77i3>f7-'!r-Ky-A 





V7h/V5X1iS8 



PDS 



PDS£lvl0t& /\VU-y? • K 
C&H3 n/cfiAStl4- 7 7 h t7X7 

<nzt e SlTtaULi^77h*<*n 





*-y h7-*£iIi;TBK;c£j&<T 

#***-*?;*£, JltijL&JiT, gfc 
* 5 0>.MSX£*fe, 1ftff0)tiH8&Ut> 
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**« NETWORK 



*;/K7— 3TSU*a;o 



I 



7^+-^7 r-MSXt;Ci, *-y 
h 7-?_LT*'J 7)\s9 < AdfajA 
fc<7)A£CHAT(fr L *"< 'J ) T 5 

tffoZo V0ICE(i^<O^(7)g|$M 

*> ^ /vffigs *T©rfr W i: * ft 

*T*J L * "* »J 1" 5 A,*f It tfteo 

/\> KJU* — A (-»/?*— A& 
fclvftfcA) ^i-^T^AT^if 

t—\£U V0ICE<7)+*Cfc. fcS 

miSfciiofc-^lJx *@^£ i 
M 1 x-isr ^ i; *ft < t\ [5]0#i; 
faA fc <7)A i: ft I *•* 'J t* # •§> £ 

z -^ntc, TOfc'fc.Efcfcn'bft 

^»J-TSft^TCi:(*T*$ftl^t 
ft£\ VOICED— ACAo'TJfc 



^"*»;t'*^i:A t aw/2fr^ ft 

•5 Us Ai^ft^A*:^ f <*(-*: 
A,tztft\ V0ICE£T6£, ^is 

Afci3£fc;fcL*"<y-es3o a 

#x.fti\«fc -5 ftA£ &*P'J -^-9 *■ 

+ >;*#&& A, fc*«fctao CftoT 

^(iU-rcuz^/fi:,fo= *-y 

<A^Lnfti^t^ r<*c«ti 

£ftoTL2o *S'J(3^i^L 

svoicB-ftoTs &£t\ mis 



(atzpe[msx02243] knocks on the door) 

[GASCON] 3-1- / 7 79'/ 3' J -/f W 

[GASCON] M*J i'/i? 

(MARI [msx00224] accepts atzpe[msx02243]) 

(atzpe[msx02243] comes in) 

[atzpe] CA,\£Ajfo 

[GASCON] An ad 

[atzpe] It K) «t fe 

[MARI] ny-fA 

[atzpe] liU*SLT>MARI 

[MARI] 4? 7?-/ *M- - 4Vi7fr' fyfx W W v9) M* /7i/f>atzpe 

[atzpe] lil«, tA^t:5/:6UI^U/: (5o(S 

[atzpe] #** n y^A^fc&oij-^ T-Tfr? 

[GASCON] fry 7Ui/"3'j f' it/ J' li*/? rnHVi' 

[MARI] *'-Kt'a *f?i 7 J**' »?Wf' **' M#ff WJfn 

[atzpe] fcli'lio ifeOTto 

[GASCON] ?RA,T^fcA3 a t z p e A»tt • ■ • 

[atzpe] #**. (S'<fcotlt>°^ 

[MARI] ir-J fr tftn %W - W 

[MARI] JS^U"* *X ! 

[atzpe] (5 o (i 

[MARI] Cftfc*tf-l?fcfc:ott?JteoT4//-i?1-«fc 

[atzpe] •5^9^^ TLi^fti 

[atzpe] AtJ(#fcfc^£*tf»3* < itLJ^tftfilfflC^T 

[MARI] C©|tjA^/-B#A^^'L otf/S LTJ>X,L * < £#>^£ Lfc 

[atzpe] X> k -3 ! A^? 

[GASCON] §'-*>-#'*-?SSlMZ)fcX,<Z>-3-r! 

[atzpe] (iJfteteo 

[MARI] «{C-&ttntt<T, HSfc^-y ^ X-<-x + -^fcLTtt 

[atzpe] (5^(S^s *-&^-fi"o^' 

[mari] It* 7 M£(fT^y K»--ryjc«i:!)fev*© 

[atzpe] ft? 

[Gascon] uo;^* 




♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 



*:c7)_ht,40Jf£;|6;LT3:-to ?T, 

> L tz ffLX't b\ l£A,t4W& 
% **v h"lZ%lALXl£itz<n 
XUz a 
£t. itiLfr-otz(Kt)\ ^^ 

^ , y H2— i?*welcome Mari ! *|W 

*9SBrtaB?fr < ttT*#fcuft 

^^iis &%>&, *>*(ix fcL* 



iMSgtije,^ fc* l-7T\ M«;^>£ L 

'j>^0*"ft^o fc «; T\ ^ ^ 9 h 
Ltz$>if<, T'TLJof:'J LT 

^tz(r>xtti\ ^■^ftc^:T♦ti^ 

7Xja(zf6fcP$-#t^T<nfti^ 
Xffltf. PbirttX < tiZ<nXT< 



L*TStft/:7U* 



;i^A^j ft ^ a^t •& t s *»c«ffll. 

(JUTTftCOj ft%Tl,^IR(7)*3 
fr*> ftl^7 U— X%¥Jr>X Llo 

•y M+ra<7)A!(*x A*s ^tl(i 
f^-a^iUftTftcTJj oTl^^fc 
u/vfzft&-?T, ,©?ri:^T<n 




tinx i * s Aiic7)#=g( j, f c* 

1^7. t— KT'^r# ^ -5 (DX\ t X 
-^— tZffi]^oT 

ft ^ x ah r ^ l tzii t\ mxx 

T r ^E-y h i'yy'JjoTi 

nt) < ^^x<tis.Ltz zn(jss 
SI$-i»t;L^fti^fcv.^ 
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8^1B(E)~8E31B(7j<) 




THE LINKS-CU8/1 1 H**6 8 

h SriMirr « r, 5fe^ -§-x- 1 » 

&*>*>A,, THE LINKS<7)4H- 

C^£i&;iTfc "bo %*•£>•? ! 

■■■■■■1 



7 2r£ o-tf A,, |_l N KSco^ v -y 



>M£ iTtHa<7) School's out 
(THE LINKStti3fiK£)£MSX;iIffc7) 

*>£*>$ &A-/-;: 11 1\ LINKS^Et-* 
A^lofi'i^^^ fcn 

CLINKS ; Er f A*Wc •? *> *> n <Dtz a 
VStt* S—Vi-lJT^ — t 



«*5£& 









6000*njfe«fc&B*&LT.**- K 





t a— K7 7-f f—oMz-oa)?— 
AtfgLtt^o.THE LINKSi: 

*-y h7-*±T*-fA*jR-5i:,o 



•y?£fE l JIHo THE LINKS0># 
•y h9-^±lcS»$nTl^*- 





ar-rux 



-a. SCg-cijirs £ ^ >£*«±**y , 
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MVflfcjilSI 



Msxmmom 

7- 7- ma&fflmRfc 

+ ! MfcT'tite U^COMSXilff 

•So MSXiiffc7)iim ffl4v*>^ 

:fe£g b^'THE LINKS(Zf|tJiAA 





**«.»NET'W0RK 

CHAT! 



^m^aroschoors^&jtr 



8E15B~8E17B(2l:00~E3:00) 



-flfrJei3M4 % THE LINKS 
<7)M7^'/\07T't), MARI£l* 
■?/\> FW-ATf|iA^L 
TSfrib, LINKS^MtZlJ, h 
ntitikfrtz&tlo ^CDMARIb 

h ;u- Aizgtf L *. * -5 (7)fc* 



ABU—*-- ) sxa— *— 



8^45—8^310 
£ * z A.trhsittekX'tfr ! 



8E21B—8J131B 
fc £ jttffck — laW^ffilt L £ L 

xtiT-rta. tiraitfc «tm«l 





FROM IP ©070284 ♦ '88*06fl 


\ '}-<>.'7-4 '.1--{ >. ♦ 02B2 0M 


1 -SAUL'S: »S*v -5*lUt'»! 


3*"5fc»=. ^Uli"TJl <R> -0 2N V" ^3J 


! UK. L^-5^ </.*. »?JT».NI6HT*A 


: 13 ®r«?"Tfr. fc.SL-13 =:/.« *>»» S 


i^ti-'Jt, a a oa'?"T. ^--*... j1"^t 


»(>*" r'^a»«A£ *r^*t^ t.n3?a 


AH-^A, 5»-5ff" - < ^ C-5C-S fli£3» 


, f;*« a-N" fe» 13 ? U - 6 jl * 1. <£ 


1 CI^jI-^ 7" T. T»*-«b^" y» 


1 *!A.»,-^"a-. j-^.i.^fj.1 ^g^k— 


QQ 




ITS cp 


MAPI ( 1^ 




MHOK ■ EIEXTf3ACKHr4&EX(5|N » Mo.O 



8^15B^b170$T'C7)3 
S Pel ^ra^(i^(7) 9 B#^ b 1 1 B# 
itt'pffy hT'MARI-b^A^ 

h ) (7)7 v * £-31 1-5 £. M ARI % *> 

^£frbTjLV?LTtiZi 

ZttffMARI® 
i/9— 7tf- V^h 

THE LNIKS<7)y-A± 

^-/l/- u^— 7*— w h 

•5<7)(lMv^c7)MARI%^ 
A,^?* — V-y KcWfc', 






THE LINKSC7)#M U*# < Tfe, 

=1 >ilff*1#if £C:#7JP L fc ix t 
Ji-5J:fco Z0)$^t*fr%s LINKS 
(7)^M (- fc -3 "6 * fc £ %*. Tl x 
£ * s iz A?- -v >*ti<ntz* 

fo.S>A,t, THE LINKStf^ffl 
^x-'ANT-300 (*-y K9— ^7*- 
L.7?~f$—) £MSXV;tfv><7) 
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SOFTWARE CONTEST 



LT?3£-raM:*ft£ »"#— * 



O.T SOFT PRESENTS 


b 


:-:l- 


L":^ii 


i 






#£-? 


frT-frtz ii'j:?^ r *IIf;. 



T'(J1«:JWT*a$*U #'J>fc?'y 
* <7)f|ft*l S E h fc U s «« r B 1 

L-- tf— Jkv, J: <7j< U.ftlftHfc 

rfrtrc*tfcUT<*J:-5&\ t'- 



A-*./ 



BlzeU'Jrh LIST 




!*ttl*l*l*l*l.-t.l.tl*WI*ttl^l*WttttWWttWWtttttttttttt 



ft 



[Bl7i2 0| >;M 
1988/3/30 <*) 



tt PAROBALL : 

tt PRESENTED BY A.T SOFT 



10 

20 
30 
40 
50 

60 

70 
80 
90 ' 

100 ' •• » > t''.JT-i' 

110 SCREEN 1 ,3 :WIDTH31 : KEY OFF :C0L0R9 , 1 , 1 : CL- 
EAR 

120 ' —— i PATTRN SET — — 
130 F0RI=384T0391 : VPOKEBASE'( 7) +1 ,&HFE :NEXT 
I :FORI=408TG415:VPOKEBA3E(7)+I .feHFFiNEXTI : 
VPOKEBASE ( 6 ) +6 , &H5 1 

140 RESTORE 1 100 :FORA=0TQ2sSP*=" " :FQRB=0TO3 
1 * READS* :SP*=SP*+CHR* (VAL < "&H"+B*) ) sNEXTB : 
SPRITE* (A) =SP* (NEXT A 
150 RESTORE 1650 
160 READS* : I FS*="@" GOTO 180 

170 READE*:S=VAL("S<H"+S*) :E=VAL < "&H"+E*) :F 
0RA=S*8TQE*Q+7 : RE ADD* sVPOKEA ,VAL ( "fcH"+D*) : 
NEXT: GOTO 160 

130 ' •••#• MMblTifj ••••• 
1 90 FOR I =0TO29 : LOCATE© , 23 : PR I NT 
200 I F I = 1 9G0T0L0CATE , 23EL SE260 



210 PRINT" 


3 330330330330: 


333' 




220 PRINT" 


3 3 3 3 03 


3 ' 




230 PRINT" 


3 3 3303 033 


3 ' 




240 PRINT" 


330 3 03 03 


3 ' 




250 PRINT" 


3 03 3 3303303 


3 ' 


:PRINT: 


PRINTSPC(10) ; 


"PRESENTS" 






260 NEXT I 








270 FOR I =0TO4000 s I F3TR I G ( ) GOTO 


290 




280 NEXT I 









5T i;*4* 

&(7) ^^C7)/\'U 

fr£-tt*::£. *B¥ElT£iWT 




•A-aiktt^a 



*3 «8 C* PLflVER 



-1 #*— v;u*— tr*"*.— ** 

- 7°Kt-2(iy3<Xx< 

•y^o -&n<mm<r>^ Jl|6]#T 

**„*-f MHi®EtJ*1 PLAYER" 



290 CLS:LOCATE0,0:PRINT' 

ESENTS" 

300 PRINT" i 



A.T SOFT PR 



310 PRINT" 1 33330 3 33033033033033033333 1" 
320 PRINT" h 3 033 3 3 3 3 3 3 r 1 " 
330 PRINT" I 33 3 3303 3 3 3 3 I" 
340 PRINT" S3 3 0330 3 33 3 3 H " 
350 PRINT" 13303303303 3303 0330 3 I" 

360 PRINT" l '" 

370 PR I NT : PR I NTSPC ( 8 ) ; " 93tlQe*»$4 < Mfe »•" : PR I 

NT:PRINTSPC<7) ;'"?n fc i7) (J) **ft B*": LOCATE 11 

, 14 :PRINT"C*0)T" --£" :L0CATE9 , 1 6 : PR I NT " ^.-.|*° tfW 

* /C" :L0CATE9 . 1 8 s PR I NT " l£W>W Ul.'.f.o " :POTSPRIT 

El, (26, 65) ,8.2:PUTSPRITE0, (200,65) ,15,0:LQ 

GATE 11 ,20 : PR I NT "1 PLAYER" :L0CATE9,22 

380 PRINT")- 2 PLAYERS" :PLAY"Slt v 160000T150L4 

05E8EC8E8EC8E8D8C8E2R8E8EC8E8ECSE8D8C8R8E2 

F8FE8FGFEFE8SC1 " , "V14T150L4O3R8CR8R8CR8CR8 

R8R8CR2C8R8CR8R8CR8C8R8C8R8R2C8CR8CR8CR8C1 

" , "V13T150CEEECEEECEEECEEEDFFFDFFF6C1 " 

390 IFSTRIG (0) ANDPLAY (0) =0GOTO430ELSE400 

400 VPOKEBASE (6) +6 ,8<H31 :FORI=0TO80 :NEXTI :V 

POKEBASE ( 6 ) +6 , fcH5 1 : FOR I =0TO80 : NE XT I 

410 GOT 0390 

420 ' •••>§ START — — 

430 CLEAR :P1*="L64T255CDEGFGL4T 150" :PLAY"0 

5V14"+P1*,"04V15"+P1*,"03V13"-t-P1* 

440 IFPLAY(0)=-1GOTO440 

450 FORI=0TO600:NEXTI 

460 ' » •• :..>a*K«)T-i' ?< tr&llfl ••>•• 

470 SCREEN2 ,2 :OPEN"GRP : "F0R0UTP0TAS#1 :CLS : 
DEFUSR=S<H41 : A=USR (0) sDEFINTA-Z : COLORS , .1 ,1s 
X 1=231 : Y 1=148 : X2=8 : Y2=148 : X=223 : KA-239 s PL* 
----"T255L64V15" 

480 RESTORE 1 100 :FORA=0TO 12 :SP*=" " SFORB-0TO 
31 : READS* : SP*=SP*+CHR* < VAL ( "?<H"+S*) ) :NEXTB 
: SPRITE* (A) =SP* :NEXTA 

490 LINE (0,155) -(255, 212) ,1 ,BF :LINE (0 , 150) 
-(255,175) ,11 ,BF 
500 RESTORE520 



SOFTWARE CONTEST 153 



■<-*, 






IVtf^lj frA,TAfctftT<* 

^So^b, ^-t575>££t&;t 
^ffr-50 *><t-?£7°n?'^A'j 

?#<££->££ LTV5<7)(2 V 94#t 
^950^(7)^-9-0 ^ ~C7)S1=21 i: 
S2=21(7)fg£gI;tft(J'OK/-c i&g 

— Afclf KZ. 1 MtfMOT'? -y f-y 

<J * 7 tztio 

ttz, MSX2**loTl*«Att^ 

470 ; fT<7)SCREEN2, 2£l^<7>£ 



SCREENS, 2fZ§tfE1-ft(£ 7°P * * =i<7>»*,-„ £»*>•:/ 7*TA%«fc. 



*o, toti, z<n¥—M$ 
5 -f h ;m®#>S;lT ? =1 fc -r * 

fi&%frbtootz'frb r ffiz?zi'(V~ 
m^ttjto- K *ta~A\fc ~ ! j^: 

*-?, y-Aiziifa<7)Ki$fcfcu 




i**.- 




2^-fXT^^«ft&zaz^*y: 









a£8 







555 SA=0 : ' Player 1 use stick number (0:ke 
ybord l:joystickl 2 : joyst ick2) 

556 SB=1:' Player 2 use stick number 

610 IF <( (STICK <SA)=1> AND SA=0> OR (STRIG (SA 

)AND SAO0))AND K1=0 THEN Kl = l :P1 = 13 

630 S=STICK(SA) :X 1=X1+ ( (S=7ANDX1 >130) - (S=3 

ANDXK239) ) *8 

660 IF STRIG (SA-2* <SA>0) > THEN GOSUBB20 

670 IF (< (STICK (SB) =1) AND SB=0) OR (STRIG (SB 

)AND SBO0))AND K2=0 THEN K2=l :P2=13 

690 S=STICK(SB) :X2=X2+ ( (S=7ANDX2>0) - (S=3AN 

DX2<112) )*B 

720 IF STRIG (SB-2* (SB>0) ) THEN GOSUB890 

790 S=STICK(SA) :Xl=Xl+( (S=7ANDX1 >130) - (S=3 

ANDXK239) ) *8 

860 S=STICK(SB) :X2=X2+ ( (S=7ANDX2>0) - (S=3AN 

DX2<112))*8 



T%tzif)<?)b(n a fcb^A,i 7V 



$#£*.£ ft b s S$J^ b ft L » 



5 1 READHA . 0W , CO : I FHA= 1 000GOTO530 
520 FORI =HATOOWSTEP2:L1NE(0,I) -(255 ,1) .CO: 
NEXT I : GOT '05 1 : DATA 16,49,6, 50 ,89 .8 ,90 , 1 00 , 9 
, 101 , 1 14.4 ,114, 122 ,5 , 124 , 130 ,7 . 144 , .1.54 ,11, 

1 000 

530 LINE (107, 100)- (147,. 100) ,8 : CIRCLE ( 127 , 1 

00 ) , 20 , 8 , , 3 „ 1 4 : FOR I =8 1 TO 1 00STEP2 : PA I NT ( 1 2 

7,1) ,S:NEXTI 

540 RESTORE540 : FOR I = 1 T 05 : RE AD A , B , C , D : L I NE ( 

A,B)-(C,D) ,15'iNEXTI :DATA 16,152,239,152,8, 

169 ,247 , 169 , 16 , 152 ,8 , 169 ,239 , 152 ,247 ,169 , 1 

28,152,128,169 

550 DEFUSRl=8cH44:A=USRl (0) :PSET(9 

OLOR 1 5 : PR I NT# 1 , " PLAYER 2 ^3 VS 

ER 1" 

560 - »— ** .tiltib-f-j ***** 

570 KA=KA-1 

580 IFKAMOD2=0GOTO600ELSE590 

590 PUTSPR I TE5 , ( KA , 1 30 ) , 1 2 , 6 : PUTSPR I TE6 

A+17,133) ,12,8:GOTO610 

600 PUTSPR I TE5 , < KA ,130) ,12,7: PUTSPR I TE6 

A+17,133) ,12,9 

610 I FST I CK ( ) = 1 ANDK 1 =0GOTOK 1=1 : P 1=13 

620 ONKTGOTO780 

630 S=STICK(B) :X1=X1+((S=7ANDX1>130)~(S=3A 

NDXK239) >*8 

640 IFQ1>0GOTOQ1=Q1-1 

PUTSPR I TE3 , ( X 1 , Y 1 ) , 1 5 , SGN ( Q 1 ) 

I FSTR I G ( ) GOTOGOSUB820 

I FSTR I G ( 1 ) ANDK2=0GOTOK2= 1 : P2= 1 3 



180) ,1 :C 
■itl PLAY 



(K 



(K 



650 
660 
670 



680 ONK2GOTO850 

690 S=STICK ( 1 ) : X2=X2+ ( (S=7ANDX2>0) - (S=3AND 

X2<112) )*8 

700 IFQ2>0GQTGQ2=Q2--1 

7 1 PUTSPR I TE2 , ( X 2 , Y 2 ) , 8 , SGN ( Q2 ) +2 

720 IFSTRIG (3) GOTOGOSUB890 

730 X=X+XF:Y=Y~YP-i :IFYP>-12GQT0YP=YP~1 

740 PUTSPR ITE0, (X.Y) , 13 ,4 : PUTSPR JTE1 , ( X , IS 

) , 1 , 5 : 1 F Y > 1 50GOTO920 

750 IFX<80RX>231G0T0XP=XP*-1 :PLAYPL*+"Q7E" 

760 6OTO560 



770 H i l l it) tl" h:r 

780 Y 1 = Y 1 -P 1 : P l =p 1-1 : 1 FP 1 =- ;|. 480TQK 1 =0 

790 S=ST I CK <0 ) : X 1 =X 1 + < ( S=7 AND X 1 > 1 30 ) - ( S=3 A 

NDXK239) >*B 

800 GOTO 640 

810 ***** iT\ JT 7iV> il =3 7J\, »*— * 

820 01=5 ; I FABS ( X 1 ~X ) < 1 6ANDABS ( Y 1 - Y ) < 1 660TQ 

XP=-(Xi-X)/l .5*<l-Kl)-i6*Kl :YF~13-25*K1 :PL 

AYPL*+"05E" 

830 RETURN 

840 ' win 93 77- t-y ***** 

850 Y2=Y2-P2:P2=P2-1 :IFP2=-14GOTOK2=0 

360 S=STICK(1) sX2=X2+((S=7ANDX2>0)-(S=3AND 

X2<112) )*8 

870 GOTO 700 

880 ***** 93 IT 7,\°i7 =3 7)1/ §■■>• 

890 (32=5 : 1 FABS ( X2-X ) < 1 6ANDABS ( Y2- Y ) < 1 6G0T0 

XP=- (X2-X) /l .5* ( 1-K2) +16*K2 : YP=13-25*K2 :PL 

AYPL*+"05E" 

900 RETURN 

910 ' •>•>■ h7fl/ taOir w it 

920 PLAYPL*+"02E" : IFX >120GOTOS2=S2+1 :LINE( 

0,0) -(99, 15) ,1 ,BF:PSET(35,5) ,1 !C0L0R15:PRI 

NT#1 ,52 

930 IFX< = 120GOTOS1=S1 + 1 :LINE (99 ,0) - (255 , 1.5 

) ,1 ,BF:PSET(200,5) ,1 :COL0R15 :PRINT#1 ,S1 

940 IFS1=21GOTOX3=210:X4=192:T3=0:C3=15:C4 
=3:6OTO990 

950 IFS2=21G0T0X3=22 :X4=22 :T3=2 :C3=9 :C4=2 : 

GOTO990 

960 I FX < = 1 20GOTOX=223ELSEX = 1 6 

970 Y=150:XP=0:YP=12:X1=231 : Yl=148 : X2=8 : Y2 

=148 :P1=0 :P2=0 :T1=0 :T2=0 :K1=0 :K2=8 :FORA=0T 

02000 :NEXTA :GOTO560 

980 ***** r--L mv ***** 

990 F0RI=67T0187STEP2:LINE(I ,39)- (I ,90) ,1 : 

NEXT I :F0RI=68T0188STEP2:LINE(I ,39) -(I ,90) , 

1 :NEXTT 

1000 IFX4<100GOTO1010ELSE1020 

1010 NA$="93" :SP=2:C=8 : GOTO 1030 

1 020 NA*= " in " : SF -0 : C= 1 5 : GOTO 1 030 



154 SOFTWARE CONTEST 



Wi&lXh 



*MSXV#v> • 77 1-7x7 • 3>?* h" T* 

it. nmK^gz^frw**) turn* • 7n? 

3JMEAftl*fcflA£& *ft*'ft207JR£1075 

S(#1 075R) &»»J » S^Wc L- ft-rOMIffttC L 

Lfcyp^At, &ft£gJ{l,fc7"n^7A<7) 
-gB(is TAKERU*^(i^°'V^-vV7 h t LT 

Mts '89^(7)1 fl^t^TfrfrT^T'-fo 



130 



SOFTWARE CONTEST 



75P3 



WfK-ftllllO 



75R 



±T^NUS *t* TAKERU J fctt/*V$— ^8S3fi 

T*#%t<7)t3RR»;S-r„ $ tz Aii££<7)7J(J. (I»7» 

#3:To 1&K<r>-7n?=7ix0>k&itztt.— tffra 
If- Lfe fe<7>, nffififfitfc £tt fcWf U L J To 

• mam mwft&iz& txfommwf 



mi$LX<tz$i\ 
®ZfO?' : 7L.$:imUzST : '(T (7P7t"-f 

©MSX, MSX2C0?IJ o <£^RAM S VRAM^o B— 
K7J>fe *fr9E& jgl/^fciattLfcfctf). 

Ctt&f 7 'J *T*-*OWT < £**.*). £$520**: 
;^(7)7J[Js i£l£&7)75(7>;&l?£®lL f3f££^ 

j£*ffc5.*TAKERUfc L < B/^^^TBB 

t •& £ # l J, y#±*l£<7)EP&tf£&;bft * "To 



^r56B2S6 




M07-E4 MSICJSE^»UJ6-ll-l 

V7S9I7- =3>x3.M& 



1 030 PUTSPR I TE0 , ( 75 , 42 ) , C , SP : PSET ( 1 03 , 40 ) , 
6:PRINT#1 ."WINNER" :PSET( 119,50) ,9:PRINT#1 , 
NA* : PRESET ( 75 , 60 ) : PR INT# 1 , " I09tft>l >¥" - tttttttft ■ " 
:PUTSPRITE10, (167,42) ,10,10 

1 040 PLAY " S0M60000T200L4O5G2RE2F62RC2RT255 
DEFGF 2E2T 1 SOD 1 T250REFGAGRGRO6C 1 DSC 1 F2E2D2C 
CI" , "S0M60000T200L4O3G2RE2FG2RC2RT255DEFGF 
2E2T150D1T250REFGAGRGRO4C1O3C1F2E2D2CC1 " , " 
T200L4V 1 4O4G2RE2RR2RR2RT255RRRRR2R2T250DCD 
EDC03BA8EFGAEFGAEC 1 C 1 R2R2R2GG 1 " 
1050 IFPLAY(0)=~1GOTO1050 

PSET (75,70) , 1 : COLOR 1 5 : PR 1 NT# 1 , " PUSH S 

KE Y " : PSET ( 75 , 80 ) . 1 : COLOR 1 5 : PR 1 NT# 1 , " 

START 

I FSTR I G ( ) GOTORUN460ELSE 1 070 

'—— DATA •*••• 

'SPRITE 

DATA 01 ,07,1F,3F,1F,07,0F,0B 

DATA IB , IB , IF ,9F ,CF ,4F ,3B ,E6 

DATA 00 , C0 , F0 , F8 , F0 , C0 , E® , 60 

DATA 70 , 70 ,F0 ,F0 ,E6 ,E8 ,5C ,B6 

'SPRITE 1 

DATA 2 1 , 07 , 9F , 3F , 1 F , 07 , 0F , 0B 

DATA 1C , IB , IF ,9F ,CF ,4F ,3B ,E6 

DATA 08 ,C0 ,F2 ,F8 ,F0 ,C0 ,E0 ,60 

DATA F0 , 70 , F0 , F0 , E6 , E8 , 5C , B6 

'SPRITE 2 

DATA 07 , 1 F , 3F , 3F , 7F , 7F , 7F , 7F 

DATA 7F , 3F . 3F , 9F , D7 , 6 1 , 4E , 39 

DATA E0 ,F8 ,FC ,6C ,6A ,6C ,FA ,FD 

DATA FD , FD , FD . FE , F 1 , E6 , EC , C7 

'SPRITE 3 

DATA 47 , IF , BF . 3F , 7F . 7F . 7F , 7F 

DATA 7F , 3F , 3F , 9F , D7 ,61, 4E , 39 

DATA E2 , F8 , FD , 6C , 9A , 6C , FA , FD 

DATA FD , FD , FD , FE , F 1 . E6 , EC , C7 

'SPRITE 4 

DATA 07 .IF, 3F ., 7F . 63 . ED . ED . E3 

DATA ED , ED , E3 , 7F . 7F , 3F , 1 F , 07 

DATA E0 ,F3 ,FC ,FE ,EE ,CF ,EF ,EF 



1060 

PACE 
TO 

1070 
1080 
1090 
1100 

1110 
1120 
1130 
1140 
1150 
1160 
1170 
1 1 80 
1 190 

1200 

1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1 290 

1300 

1310 
1320 



1 330 DATA EF , EF , C7 , FE , FE . FC , F 8 , E0 



1340 'SPRITE 5 

1 350 DATA 00 , 00 , 00 . 00 , 00 , 00 , 00 , 00 
1 360 DATA 00 , 00 , 00 , 0F , 7F , FF , 7F , 0F 
1370 DATA 00,00.00,00,00,00,00-00 
1380 DATA 00,00.00,F0.FE,FF,FE,F0 
1390 'SPRITE 6 

1400 DATA 72,56,62,52,77,01 ,63, B7 
1410 DATA B5 , FE , 7F , 0E ,, 3E . 7C , 00 , 00 
1 420 DATA 77 . 45 , 77 , 1 4 , 74 , F0 .58 , EC 
1 430 DATA EC , F 6 , FF . 38 , 3E . 1 F , 00 „ 00 
1440 'SPRITE 7 

1 450 DATA 72 , 56 , 62 , 52 , 77 ,01,63, B7 
1460 DATA B5.FE.7F,0E,07,03,00,00 
1 470 DATA 77 , 45 ,77,14, 74 . F0 , 58 , EC 
1 480 DATA BC , F6 , FF , 38 , BE , OF , 00 , 00 
1490 'SPRITE 8 

1 500 DATA 77 . 25 , 25 , 26 , 75 , 00 , CF , DF 
1510 DATA 7F , 1 B , 36 , 00 , 00 , 00 , 00 , 00 
1 520 DATA 77 , 22 , 22 , 22 , 72 , 00 , 00 , 30 
1 530 DATA A8 , 3C , 28 , 00 , 00 , 00 , 00 , 00 
1540 'SPRITE 9 

1 550 DATA 77 , 25 , 25 , 26 , 75 , 00 , CF . DF 
1560 DATA 7F,1B,0D,00.00,00,00,00 
1 570 DATA 77,22.22.22, 72 , 00 , 00 , 80 
1580 DATA A8,3C,94,00,00,00.00,00 
1590 'SPRITE 1.0 

1600 DATA 00,00,07,08,6F,9F,AF ,3F 
1 6 1 DATA 67 , .1. F , 03 ,01, 03 ,01 ,07 , 0F 
1620 DATA 00,00,E0,10,F6,F9,F5.F1 
1 630 DATA E6 , F8 , C0 , 80 , C0 . 80 , E0 , FB 
1640 ' ■— • PATTRN DATA •••» * 
1650 DATA 80,87 

1660 DATA 00. FE, 54 ,54 ,FF .10,10.10 
1 670 DATA 70 , 8E , 2A , F A , 6 A , 7 A , AA , 2E 
1 680 DATA 44 , 54 . FF , 55 , 55 , 73 , 50 , 8F 
1690 DAT' A 05 , FF , 44 , F 5 , 4E . 64 , 8E ., 1 5 
1 700 DATA F 1,95, F5 , 45 , 25 ,51,91. 23 
1710 DATA 38 , 7C , 7C , 7C . 88 .10, 00 , 1 
1720 DATA 40, FE, 48,70.48,82,70 ,00 
1 730 DATA 00 , 00 , 20 , 3E , 42 . I. '% , 08 , 04 
1740 DATA @ 
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SHORT PROGRAM ISLAN D 










mznx&z) 










+J,A~7U-* 











<7)®[Zf2 3 X 3(7)V^g^<fpibtl 
JpLT'Lj:, 



10 'Number PI ace 

20 CLEAR 800 :A=RND( -TIME) 

30 SCREEN 1 , 2 : W I DTH32 : KEY OFF : COLOR 1 5 , , 

40 DIML*<8,8) 

45 PRINT"SELECT LEVEL< 1 (EASY ) -3 (HARD) •■ ■ " • 

46 A*=INPUT*(1> :IF A*<"I" OR A*>"5"S0TQ45 
ELSEPRINTA* :L*=A* :L= .7- .05*VAL (A*) 

47 PRINT"WAIT A MINUTE." 
50 GOSUB 1200 

55 SCREEN 2 ,2 :OPEN"SRP : " AS#1 

56 A*= " " : FOR I =0TO3 1 : A*=A*+CHR* ( VAL ( " 8<H " +M I 
D* ( "C0F07C1F070F0F1F1F0F0F0703000000002060 
60E0E0F0F0F0F8F8FCFCFC7870" ,1*2+1 .2) ) ) -NEX 
T:SPRITE*<0)=A* 

57 ' C0F07C 1 F070F0F 1 F 1F0F0F0703000000002060 
60E0E0F0F0F0FBF8FCFCFC7870 

60 GOSUB 1000: GOSUB 1100 

70 COLOR 8:PSET(172,16) ,0 :PRINT#1 , "NUMBER" 

:PSET(188,32) ,0 :PRINT#1 , "PLACE" 

80 COLOR 1 1:PSET( 188,64) ,0:PRINT#1," LEVEL" 
+L* 

90 X=0:Y=0: COLOR 15 

100 A=FRE(0) :A=STICK(0) 

110 X=X-(A>1ANDA<5)+(A>5ANDA<9) sX=X-(X<0)+ 
(X>8) 

120 Y=Y- <A>3ANDA<7) + ( < A<3ANDA>0) ORA=B) :Y=Y 
-(Y<0)+(Y>8) 

130 PUTSPRITE0, (X*16+20,Y*16+20) ,11,0 

140 A*=INKEY* 

150 IFA*=" "GOTO 200 

160 IFA*>"0"ANDA*<" :"GOTO300 

190 GOTO100 

200 'ERASE 

210 I FM I D* ( N* ( Y ) , X + 1 , 1 ) < > " " THENBEEP : GOTO 1 

00 

220 IFMID*(M*(Y) , X + l , 1 ) ="0"THENBEEP :GOTO10 



230 MID*(M*(Y> ,X+1,1)="0" :L INE(X*16+16,Y*1 
6+16)-(X*16+23,Y*16+23) ,0 ,BF : AN=AN+1 :GOTO 

100 

300 'SET 

310 IFMID*(N*(Y> , X+l, 1)<>»0» THENBEEP sGOTOl 

00 

320 I FM I D* ( M* ( Y ) , X + 1 , 1 ) < > " « THENBEEP : GOTO 1 

00 

330 I F I NSTR ( M* ( Y ) , A* ) THENBEEP : GOTO 1 00 
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SHORT PROGRAM ISLAND 



i^xissn/-z3x 3 

wt£\.\ ^ic, mm 

-3 fca»oe ? ^u-^I#ti**6^ 



QOBaaooai 
□aaaaaaai 

aQDEIElQEiai 

aaaaaoaaa 

an o raei 

infi id, 

aaQaaaaaEi 
aaaaaaaan 

9SD gas FJCJH 



NUMBER 
PLACE 



COMPLETED 



£1L < !i'%A N| bs SA,T(fA'U ^"bflfct**'. 



®S<1" ; St-(i N ffelJ|K*-fA£Bg 

«mufc*«» «<7Xt-ai_ 

m J£ *> ft < 4' o fc At S7- +- u > 
jfr 0#HZ ft o X 5 ( 7 £\ 42ffC * 

■b1,200£l^*>lt£fo 




1M3* 




34iZ" B*="" :FORI=0TOB:B*=B*+MID*<M*<I> ,X+1,1 

) :NEXT 

350 IFINSTR <B* ,A*) THENBEEP : GOTO 100 

360 XX=(X¥3)*3+1 :YY=(Y¥3)*3:B*="" :FORI=YYT 

0YY+2:F0RJ=XXTQXX+2:B*=B*+MID*<M*<I> ,J,1> : 

NEXT -.NEXT 

370 IFINSTR (B* ,A*> THENBEEP : GOTO 100 

380 MID*<M*<Y) ,X + 1 .1)=A*:PSET(X*16+16.Y*16 

+ 16) ,0:PRINT#1 ,A*5 :AN=AN-1 : IFAM>0GOTO100 

400 'COMPLETE! 

410 COLOR S:PSET(16, 176) :PRINT#1 /'COMPLETE 

D! " 

420 PLAY"s0m5000t80o41 4ge8.-f 16gcl 16defgf8e 

8d8o3gagf ed" 

430 PLAY"o4efgag8g8o5c4o4g4+8e8d8 .ccl " 

440 A*~ I NKEY* : I FA*< > " " GOTO440 

450 A*=INKEY* s IFA*-" "GOTO450ELSERUN 

1000 "19 9 If) 

1005 CLS 

1010 FORI=0TO3:FORJ=0TO2 

1020 LINE(10+I*48+J,10)-(10+I*4B+J",156) ,4: 

LINE(10,10+I*48+J)-(156,10+I*48+J) ,4 

1030 NEXT:NEXT 

1040 FOR I=0TO7:LINE(27+I*16,10)-(27+I*16, 

156) ,4:LINE(10,27+I*16)-(156, 27+1*16) ,4:NE 

XT 

1080 RETURN 

1100 'DATA SET AND DISPLAY 

1110 COLOR 7:F0R 1=0 TO 8 :M* < I ) =" " :FOR J=l 

TO 9 
1120 M*=MID*(Y*,I*9+J,1) 

1130 IF VAL<M*> THEN PSET <J*16 , 1*16+16) ,0 : 
PRINTttl ,CHR*(48+VAL(M*) ) ; 
1140 M*(I)=M*(I)+M* 

NEXT :IM* ( I ) =M* ( I ) :NEXT :RETURN 

'MAKE QUIZ 

FORI=0TO8:M(I)=I + 1 :NEXT 

FORI=7TO0STEP-1 :SWAPM ( INT (RND ( 1 ) * ( 1+1 
) ) ) ,M(I) :NEXT 
1 225 RESTORE50 1 : READY* 

1230 F0RI = 1T081 :MID*(Y*,I ,1 ) =CHR* (48+M < VAL 
(MID*(Y*,I ,1) )-l) ) :NEXT 

1240 FORI=0TO8 :FORJ=0TO8 :L* ( J , I ) =MID* ( Y* , I 
*9+J+l ,1) :NEXT:NEXT 

1 250 FORK= 1 TO 1 : ON I NT ( RND ( 1 ) *4 ) + 1 GOSUB 1 300 
,1320,1340,1360 

1260 NEXT : Y*=" " :FORI=0TO8 :FORJ=0TO8 : Y*=Y*+ 
L*(J,I) :NEXT:NEXT 

1270 AN=0:FORI=1TO81 :IFRND(1) >LTHENMID* ( Y* 
,I)="0" :AN=AN+1 
1275 NEXT 
1280 RETURN 

1300 X = INT(RND(1)*3) : Y = INT (RND ( 1 ) *3) :FORI = 
0TO8 :FORJ=0TO2 :SWAPL* ( X*3+J , I ) ,L* ( Y*3+J , I ) 
:NEXT:NEXT:RETURN 

1320 X = INT(RND(1)*3) : Y = INT (RND ( 1 ) *3) :FORI = 
0TO8:FORJ=0TO2:SWAPL*(I ,Y*3+J) ,L*(I ,X*3+J) 
:NEXT:NEXT:RETURN 

1340 X = INT(RND(1)*3) : Y = INT (RND ( 1 ) *3) :Z = INT 
(RND(1)*3) :FORI=0TO8:SWAPL*(Z*3+X,I) ,L*(Z* 
3+Y,I) :NEXT:RETURN 

1360 X=INT(RND(1)*3) : Y=INT (RND ( 1 ) *3) :Z=INT 
(RND(1)*3) :FORI=0TO8:SWAPL*(I ,Z*3+X) ,L*(I , 
Z*3+Y) :NEXT:RETURN 
5000 'NUMBER DATA 

50 1 DATA " 7653498 1 289452 1 63723 1 768495 1 4695 
732858213476997368215432781594665947328141 
8296573" 



1150 
1200 
1210 
1220 



■ 
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Il/'K- 5?— LIST 



100 DEFINT A-Z:COLOR 15 , 1 , 1 :SCREEN 1,1:KEY 

OFF: WIDTH 30: GOSUB 840 
110 VPOKE 8<H2017,&H81 :VPOKE &H2016 ,8<HA1 
120 G*=CHR*(31)+CHR*<29> :H*=G$+CHR* (29) +CH 
R*<29) 

130 CH* (0) = '"r'+G*+"I" :CH* (2) ="7"+G*+"i'" 

140 FOR 1=0 TO 7: RE AD S* :SP*=SP*+CHR* ( VAL ( 

"&H"+S$) ) :NEXT:SPRITE*(0)=SP* 

150 KEYU)ON:ON KEY GOSUB 760 

160 REM I MMII DATA SET IIHIIIIIIHH 

170 IF GF THEN GF=0:GOTO 210 

180 READ W:IF W=5963 THEN CLS:PRINT "***** 

CONGRATUL AT I ONS ! ***** " : END 
190 FOR 1=0 TO We RE AD CX ( I ) ,CY ( I ) : IF CX ( I ) 

THEN CV(I)=-1 ELSE CV(I)=1 
200 NEXT:READ Q:FOR 1=0 TO Q:READ CE(I),YC 
(I) :NEXT:READ CP 

210 FOR 1=0 TO W:X(I)=CX(I) :Y(I)=CY(I) :V(I 
)=CV(I) :NEXT 

220 FOR 1=0 TO Q:EX(I)=CE(I) :EY(I)=YC(I) :N 

EXT:PW=CP:CC=0 

230 REM — — STAGE ■ 



240 CLS:FOR 1=7 TO 22 STEP 3:L0CATE 0,1 :PR 

INT STRING* (27, "3") 

250 FOR J=4 TO 20 STEP 4:L0CATE J,I:PRINT 

" :NEXT J, I 
260 LOCATE 0,7: PR I NT STRING* (27 , "3" ) 
270 FOR 1=0 TO W:LOCATE X ( I ) *4+l , Y ( I ) *3+8 : 
PRINT CH*<V(I>+1) sNEXT 
280 FOR 1=0 TO Q:LOCATE EX ( I ) *4 ,EY ( I ) *3+10 

: PR I NT "^r":NEXT 
290 LOCATE 0,0:PRINT "<ELEVATOR> STAGE: 

STEP : " ; 
300 X=0:CC=0:PUT SPRITE , (44 ,36) , 10 ,0 
310 REM — — MAIN ——————— 



320 LOCATE 17,0:PRINT USING "##" ;ST+1 :LOCA 

TE 26,0:PRINT USING "##" ;PW 

330 K=STICK(0) 

340 IF K=3 OR K=7 THEN GOSUB 370 

350 IF K=l OR K=5 THEN GOSUB 440 

360 GOTO 320 

370 REM ••• — MOVE I Ht l l llll Hl l tlt t 

380 IF X=0 AND K=7 THEN RETURN 

390 IF X=4 AND K=3 THEN RETURN 

400 VX=(K=7)-(K=3) :XX=X*4+4 

410 FOR 1=1 TO 4:XX=XX+VX 

420 PUT SPRITE , ( XX*8+12 ,36) , 10 ,0 

430 NEXT:X=X+VX:RETURN 

440 REM — LIFT 111 ■■•••■■••II H ■ I 

450 ER=0:FOR 1=0 TO Q 

460 IF EX(I)-1=X AND EY ( I ) =0 AND K=l THEN 

ER=1 

470 IF EX(I)-1=X AND EY ( I ) =4 AND K=5 THEN 

ER=1 

480 NEXT: IF ER THEN RETURN 

490 FOR 1=0 TO Q 

500 IF EX(I)-1<>X THEN 530 

510 LOCATE X*4+4,EY(I)*3+10:PRINT " 

520 EY(I)=EY(I)+(K=1)-(K=5) 

530 NEXT:FOR 1=0 TO Q 

540 LOCATE EX ( I ) *4 ,EY ( I ) *3+liZi : PR I NT "*")t" 

550 NEXT 

560 FOR 1=0 TO W:IF X(I)-1<>X THEN 600 

570 LOCATE X*4+5 , Y < I ) *3+8 : PR I NT " "+G*:+" " 

580 Y(I)=Y(I)+(K=1)-(K=5) 

590 LOCATE X*4+5 , Y ( I ) *3+8 :PRINT CH* < V ( I > +1 

) 
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tfto. *5*fo!! z <&*£¥(:: 
1 1 TilA,t*i**4 5 oz £ ft, 

> JU§i*T, z<7>aetff|j£#7M::sfcb 
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fir? firA^^SWfrlfc^TB 



5Z£fc'„ #o£ftfllt*zi:t:: 

fc -5 £ * -5 (7) ti h±xb it L # i \ 
fc*r;LA<fcl.^W«i:<7)£f 

fc $ <b(Z3|l*&tt** $ fc*>(Z# 
T'ltttzg-tSlo Zbitt^o t> 



MMETD^abLIST 



10 FOR 1=0 TO 255: FOR 
(24)=I:NEXT I :GOTO 10 

L-ji^ *- — 

aanreaeOT 

z <m tXiK £'~ L T fc»(t fc 
SAfc^lit 1 . ^fZ-C; *>cfc^> 

*1\ Z(7)yP^*7ATti#® 
(7)7*—^ ttl Q2(MtJ51&0>t'— ?3t 
TiSJtLTl^o Z0>1*TtM>\ 

Ttfcfe* ZtlSr^ft 
X.Wftl£ *v*y7 
®* U T-J&^fco 



J=0 TO 15:NEXT J:VDP 
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<ELEVflTOR> STAGE: 2 
Give Up ! ! 


STEP : 


1 l 
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600 NEXT:PW=PW-1 

620 NW=0:FOR N=0 TO W 

.630 P=VPEEK (8<H1800+Y <N) *96+258+X (N) *4+V <N) 

*4> 

640 R=VPEEK <S<H1800+Y <N) *96+322+X (N) *4+V <N) 

*4) 

650 IF PO-32 OR R=32 OR V<N)=0 THEN 740 

660 FOR K=X<N>*4 TO X (N) *4+3*V <N> STEP V(N 

) 

670 LOCATE K+l , Y (N) *3+8 : PR I NT " "+G*+" " 

680 FOR P=0 TO 49:NEXT 

690 LOCATE K+l+V (N) , Y (N) *3+8 :PRINT CH*(V(N 

)+l) 

700 NEXT K:X(N)=X(N)+V(N) :NW=1 

710 IF X(N)=0 AND V(N)=-1 THEN CC=CC+1:V(N 

)=0 

720 IF X(N)=6 AND V(N)= 1 THEN CC=CC+1:V(N 

)=0 

730 IF CC=W+1 THEN 790 

740 NEXT N:IF NW THEN 610 

750 IF PW=>0 THEN RETURN 

760 REN — • GIVE UP! —————— 

770 LOCATE 10,3:PRINT "Bive Up ! ! " 

780 IF INKEY*<>" " THEN 780 ELSE GF=1 :RETU 

RN 160 

790 REM — 1 SUCCEED! — — — 

800 LOCATE 7,3:PRINT "You Succeeded!" 

810 ST=ST+1 

820 IF INKEY*<>" " THEN 820 ELSE 160 

830 GOTO 160 

840 REM • — CHARACTER — — — 

850 READ C$,D$:IF C$="END" THEN RETURN 

860 FOR 1=0 TO 7 

870 P=VAL("&cH"+MID$(D*,I*2+l ,2) ) 

880 VPOKE ASC(C$)*B+I ,P 

890 NEXT: GOTO 850 

900 DATA ?,3C767E3C007EDBDB 

910 DATA •f,DBC3FF007474747B 

920 DATA O,3C6E7E3C007EDBDB 

930 DATA I,DBC3FF002E2E2EDE 

940 DATA '7,183C666666663C18 

950 DATA H,FFFFFC0000000000 

960 DATA ^,00FFFF0F00000000 

970 DATA ">,00FFFFFF00000000 

980 DATA r,00FFFFF000000000 

990 DATA END, 

1000 DATA 3C,7E,DB,DB,BD,C3,FF,66 

1010 REM •••• — • STAGE DATA — — 

1020 DATA 3,0,1,0,3,6,1,6,4,9,1,2,1,4,2,1, 

2,2,3,0,3,3,4,2,4,4,5,0,5,3,14 

1030 DATA 1,0,0,6,4,9,1,1,1,3,2,0,2,3,3,0, 

3,2,4,1,4,2,5,0,5,3,5 

1040 DATA 2,0,1,0,2,0,4,8,1,3,2,2,2,4,3,0, 

1050 DATA 3,0,2,0,3,6,1,6,3,9,1,0,1,1,2,1, 

2,2,3,0,3,4,4,2,4,4,5,2,5,4,19 

1060 DATA 2,0,1,0,3,6,1,4,1,2,2,0,3,1,4,3, 

5,3,12 

1070 DATA 7,0,0,0,1,0,2,0,3,6,1,6,2,6,3,6, 

4,8,1,4,2,1,2,3,3,0,3,2,3,4,4,1,4,3,5,0,30 

1080 DATA 3,0,0,0,2,6,2,6,4,8,1,1,1,3,2,1, 

2,2,3,2,3,4,4,3,5,1,5,3,6 

1090 DATA 3,0,2,0,4,6,1,6,4,9,1,3,2,0,2,2, 

2,4,3,2,3,4,4,2,4,4,5,0,5,2,10 

1100 DATA 1,0,0,6,0,8,1,3,1,4,2,1,2,3,3,1, 

4,0,4,2,5,1,5,4,7 

1110 DATA 5963 
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100 CLEAR 1000:DEFINT A-Z : COLOR 15, 1,1: SCR 

EEN 1,1:KEY OFF:WIDTH 30:GOSUB 820 

1 1 SPR I TE$ < ) = " <"an2x " +CHR$ ( 255 ) +CHR* ( ) 

1 20 SPR I TE* ( 1 ) = " f +$$B< " +CHR* ( ) +CHR* ( 255 ) 

1 30 G*=CHR$ (31) +CHR$ ( 29 ) +CHR* ( 29 ) 

140 KEY(1)0N:0N KEY GOSUB 750 

150 REM III I I H STAGE ——————— 

160 IF GF THEN GF=0:GOTO 180 

170 IF SG=9 THEN 790 ELSE FOR 1=0 TO 7: RE A 

D CC$(I) :NEXT:SG=SG+1 

180 FOR 1=0 TO 7:SC*(I)=CC*<I> :FOR J=l TO 

10 

190 P=VAL(MID*(SC*(I) ,J,1) ) 

200 LOCATE J*2-2, 1*2+5 

210 ON P+l GOSUB 230,240,250,260,270,280,2 

90,300,310,320 

220 NEXT J, I :GOTO 330 

230 PRINT "7-i"+G*+"7l" : RETURN 

240 PRINT '"77"+G*+"D*r : RETURN 

250 PRINT "9*"+B$+" , !/5" 

260 PRINT "^y"+G$+".St' 



: RETURN 
.■RETURN 
: RETURN 
: RETURN 
rRETURN 
: RETURN 
:RETURN 



270 PRINT n lH/' , +G$+"VV' 

280 PRINT "M-"+G*+"hh' 

290 PRINT "77"+G*+"77' 

300 PRINT "7.7!."+G$+' , tt' 

310 PRINT "++"+G*+"++' 

320 PRINT "'VV , +G*+"'yV' : RETURN 

330 LOCATE 0,0: PR I NT "C COLOR PLATE] 

RANK:" ;CHR*(75-SG) 
340 X=0:Y=0:VX=0:VY=0:GOTO 380 
350 REN >■>•!•§ MAIN I M I I II tl l l l l l 



STAGE 



370 K=STICK(0) :IF K=0 THEN 370 

380 VX=(K=7)-<K=3) : VY= <K=1 ) - <K=5) 

390 P= VPEEK < 2<H 1 8A 1 + ( Y +V Y ) *64+ ( X+VX ) *2 ) 

400 IF P=184 OR P=192 OR F-200 THEN GOSUB 

470: GOTO 428 

410 IF PO-177 THEN VX=0:VY=0 

420 X=X+VX:Y=Y+VY 

430 X=X-(X<0)+(X>9) :Y=Y-(Y<8)+(Y>7) 

440 PUT SPRITE , <X*16+8 , Y*16+39> , 15 ,0 

450 PUT SPRITE 1 , ( X*16+8 , Y*16+39) , 1 , 1 

455 FOR 1=0 TO 99:NEXT 



460 GOTO 350 

470 REM ••>■■•§ BLOCK MOVE —— — — — 

480 C=VAL(MID*(SC*(Y+VY) ,X+VX+1 ,1) ) 

490 IF X+VX*2<0 OR X+VX*2>9 THEN RETURN 

500 IF Y+VY*2<0 OR Y+VY*2>7 THEN RETURN 

510 P=VAL(MID$(SC*(Y+VY*2) ,X+VX*2+1 ,1) ) 

520 IF P=0 THEN 590 

530 IF C=l AND (P=5 OR P=6 OR P=8 OR P=9) 

THEN RETURN 350 

540 IF C=2 AND (P=4 OR P=6 OR P=7 OR P=9) 

THEN RETURN 350 

550 IF C=3 AND (P=4 OR P=5 OR P=7 OR P=8) 

THEN RETURN 350 

560 IF C=l AND P=7 THEN C=4:SF=1 

570 IF C=2 AND F-8 THEN C=5:SF=1 

580 IF C=3 AND P=9 THEN C=6:SF=1 

590 MID*(SC*(Y+VY) ,X+VX+1 , 1 ) ="0" 

600 MID*(SC*(Y+VY*2) ,X+VX*2+1 , 1 ) =RIGHT* (ST 

R*(C) ,1) 

610 LOCATE (X+VX*2)*2, <Y+VY*2>*2+5 

620 ON C+l GOSUB 320,240,250,260,270,280,2 

90 

630 LOCATE ( X+VX ) *2 , ( Y+VY) *2+5 :GOSUB 230 

640 IF SF THEN GOSUB 660:SF=0:IF CF THEN 7 

00 

650 RETURN 

660 REM — — — CLEAR ? §————— 

670 CF=l:FOR 1=0 TO 7:F0R J=l TO 10 

680 P=VAL(MID*(SC*(I) ,J,1) ) :IF P>6 THEN CF 

= 

690 NEXT J, I :RETURN 

700 REM ••>■ » > CLEAR ! ——————— 

710 LOCATE 0,2: PR I NT "YOU SUCCEEDED!" 

720 IF INKEY*<>" " THEN 720 

730 LOCATE 0,2:PRINT TAB (30) 

740 GOTO 150 

750 REM •••••>■ GIVE UP! — — — —— 

760 LOCATE 0,2: PR I NT "GIVE UP THIS STAGE!" 

:GF=1 

770 IF INKEY*<>" " THEN 770 

780 LOCATE 0,2: PR I NT TAB (30) : RETURN 150 

790 REM •••••• ENDING ll llim ill t t ltll 
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800 LOCATE 0,2:PRINT "YOU CLEARED ALL STAG 

ES! " 

810 LOCATE 0,3:PRINT "CCC GAME END }}}":LO 

CATE 0,22 :END 

820 REM •••••• CHARACTER —————— 

830 READ D*:IF D$="END" THEN 870 

840 FOR 1=0 TO 2:READ C* 

850 FOR J=0 TO 7:P=VAL("&H"+MID*<D*,J*2+1 , 

2>)iVPOKE ASC<C*)*8+J,P:NEXT 

860 NEXT:GOTO 830 

870 VPOKE BASE(6)+22,8.HA1 

880 VPOKE BASE(6)+23,8<H41 

890 VPOKE BASE(6)+24,8<H81 

900 VPOKE BASE(6)+25,8<H21 

910 RETURN 

920 DATA FFE0C08081818181 ,9,9,* 

930 DATA FE0E0686C6C6FEFE,T,*,,' 

940 DATA 818180C0E0FFFF00,:],"J,i'> 
950 DATA C6C686060EFEFE00,^,f ,t 
960 DATA FFFFFFFFFFFFFFFF,I',h ,7 
970 DATA CC33CC33CC33CC33,7f,*,'^ 
980 DATA FFFFFFFFFFFFFFFF,7,7,7 
990 DATA FEFEF6F6F6F6F6F6,-i",i" ,-f 
1000 DATA FFFFFFF0F0FFFF00,7,7,'7 
1010 DATA F6F6F60606FEFE00,I,I,I 
1020 DATA END 
1030 REM ••••••• STAGE DATA 






1 040 DATA 0000000000 , 40 1 0024080 , 0500005604 
,0055000600 

1050 DATA 0000640000,0000050360,0070004690 

,0000060060 

1060 DATA 0000006000,0080005000,0746024004 

,4600106005 

1 070 DATA 0503005080 , 0020004006 , 1 09006070 

,0000005000 

1 080 DATA 0000000050 , 00 1 0024040 , 0860400000 

,0050536660 

1090 DATA 0000050006,0040400700,0600000090 
,0000000040 

1100 DATA 0000005400,0662500030,5040004000 

,0401030040 

1110 DATA 5008090500 , 0006005000 , 0700605900 

,0050000006 

1 1 20 DATA 0000046500 , 1 47005600 , 0420000000 
,0060050340 

1 1 30 DATA 008000 1 600 , 0050000470 , 0650000900 
,0000000000 

1 1 40 DATA 0050000505 , 1 03920060 , 0829300005 

,0002080800 

11-50 DATA 0076006005,4000000060,0505050505 

,4040404040 

1160 DATA 0004000060,0101460060,0240046000 

,0550403000 

1 1 70 DATA 4850605600 , 0090000650 , 0930570400 

,0000500000 

1 1 80 DATA 0040060005 , 0205004560 , 0500405000 

,0650005400 

1190 DATA 0004060000,4005000000,0056406080 

,0400500000 

1200 DATA 0000000000,0300404865,0500905000 

,0200605000 

1210 DATA 0544504560 , 1 00802000 , 0600607000 

,0000000000 

1220 DATA 0000000000,0405003080,0206005040 

,0507009010 

1230 DATA 0604004050,0305006050,0504005090 

,0000000000 

1240 DATA END 
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